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20 new product reviews. 



HDS Floppy Drive Controller Boa 
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HARD DRIVE SPECIALIST 

coloh coururen controllbh 



Plated Edge Cards 
I Selectable ROM Sockets 
Compatible with COCO I & II 
' 120 Day Warranty 
" Double and Single Density 



UHL. 
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Drive 1 Complete . 
Drive & 1 Dual Drive 



SINGLE SIDE 
$199. 
$129. 
. $319. 



Reduce your I/O errors with the Hard Drive Specialist 
Floppy Drive Controller for the Color Computer. Gold edge 
card connectors, advanced design, and the absence of 
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sion controller allows the use of either (two 24 pin ROMS), 
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with the standard Radio Shack ROM gives you 100% com- 
patibility with all Radio Shack software. 
Completed and Tested Board 

with Radio Shack ROM $99. 

(Includes Case, and DOS Instructions) 



(Includes Case) 

Bare Board with Instruction manual $30. 

Parts Kit For Bare Board without ROM $30. 

Radio Shack ROM (current version) $20. 

Radio Shack ROM 1.0 $40. 



Ordering Information ; 

Use our WATS line to place your order via Visa. MasterCard, or Wire Transfer. Oi 
mall your payment directly to ub. Any non-certitied lunds will be held until proper 
clearance is made. COD orders are accepted as well as purchase orders tram 
government agencies. Most Items are shipped oil the shell with the exception ol hard 
drive products that are custom built UPS Qround Is our standard means of shipping 
unless otherwise specilied. Shipping costs are available upon request 



ADOS ROM (24 or 28 pin PROM) 

ADOS is a product of SpectroSystems of Miami Florida 



ADOS supports 2 drives, 40 track, 6ms trk-to-trk drives 
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TKBUG Monitor and DOS 1.0 

on PROM (24 or 28) $40. 

New, unique CoCo software monitor in ROM designed 
for a minimum of key strokes and fully compatible with the 
1.0 version of disk basic. Features 33 single key com- 
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edit RAM in either hex or ASCII format. Also allows the 
user to dump screen or memory to printer, set break points, 
alter baud rate, set 64K RAM mode, and more, TKBUG 
by TOMMY KEETON. 



HARD DRIVE SPECIALIST 

1-713-480-6000 
Order Line 1-800-231-6671 
16208 Hickory Knoll 
Houston, Texas 77059 



From Computer Plus to YOU 



HP 



after 
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Tandy 200 24K $649 
ModeM00 24K$425 





Color Computer II 
w/64K Ext. Basic $179 



Tandy 1000 $710 

Tandy 1000HDS 1539 

Tandy 1200HDS 1599 




Smith Corona L-1 000 
$259 







Color Computer Disk Drive 
Drive $239 Drivel $189 




BIG SAVINGS ON A FULL COMPLEMENT OF RADIO SHACK COMPUTER PRODUCTS 



COMPUTERS 

Tandy 10001 Drive 128K 710.00 

Tandy 1000 HD 10 Meg. 256K 1539.00 

Tandy 1200 HD 10 Meg. 256K 1599.00 

Model IVD 64K with Deskmate 889.00 

PRINTERS 

Radio Shack DMP-1 05 160.00 

Radio Shack DMP-1 30 269.00 

Radio Shack DMP-430 660.00 

Radio Shack CGP-220 359.00 
Radio Shack DWP-220 Daisy Wheel469.00 
Silver Reed EXP-550 Daisy Wheel 400.00 

StarSG-10 245.00 

StarSG-15 410.00 

Panasonic P-1091 259.00 

CITOH Prowriter 851 0AP + NLQ 345.00 

Toshiba 1340 469.00 

Okidata 192 375.00 

Epson LX-80 245.00 

Epson FX-85 369.00 

MODEMS 

Radio Shack DCM-3 Modem 52.00 

Radio Shack DCM-5 Modem 99.00 

Radio Shack DC Modem 2212 315.00 



COLOR COMPUTER MISC. 

Radio Shack Drive Controller 139.00 
Extended Basic Rom Kit 39.95 

64K Ram Upgrade Kit 39.00 

Radio Shack Deluxe Keyboard Kit 24.95 
HJL Keyboard Upgrade Kit 79.95 

COCO Max Y Cable 27.95 

Botek Serial to Parallel Conv. 69.95 

Radio Shack CCR-81 Recorder 52.00 
Radio Shack Deluxe Joystick 26.95 

Amdek Color 300 Monitor 265.00 

Amdek Video 300 Green Monitor 139.00 
Amdek Video 300 Amber Monitor 149.00 
Taxan Color 220 Monitor 245.00 

Tatung DM-12VLG Green Monitor 139.00 
Tatung DM-12VLA Amber Monitor 149.00 
Radio Shack VM-2 Green Monitor 129.00 
Mark Data Universal Video Driver 29.95 
COLOR COMPUTER SOFTWARE 

TAPE DISK 
Approach Control Simul. 29.95 34.95 
Worlds Ol Flight 29.95 32.95 

Mustang P-51 Flight Simul. 29.95 34.95 
Spectral Typing Tutor 19.95 22.95 

Dungeon Quest 24.95 27.95 



Major Istar 24.95 27.95 

Sam Slueth Private Eye 24.95 27.95 

Mark Data Graphic Adven. 24.95 27.95 

Graphicom (disk only) 29.95 

COCOMaxbyColorware 69.95 69.95 

Color ComE (rom) 49.95 49.95 

AutoTerm by PXE Computing39.95 49.95 

Key-264K by Key Color 39.95 44.95 

Telewriter 64 49.95 59.95 

Deft Pascal Workbench 89.95 

Deft Extra 39.95 

Pro Color File Enhanced 2.0 59.95 

Telegraphies by Derringer 24.95 

Elite Calc 69.95 69.95 

Elite Word 69.95 69.95 

Elite File (disk only) 74.50 

DynaCalc (disk only) 99.95 

Word Pack II by PBJ 134.95 

VIP Writer (tape 8c disk) 69.95 

VIP Integrated Library (disk) 149.95 

Order any 2 software pieces listed 
and take 10% off their listed price. 
All Radio Shack software 10% off list. 
Send for complete list. 



CALL TOLL FREE 
1-800-343-8124 

• LOWEST POSSIBLE PRICES 

• BEST POSSIBLE WARRANTY 

• KNOWLEDGEABLE SALES STAFF 

• TIMELY DEL/VERY 

• SHOPPING CONVENIENCE 



com 
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P.O. Box 1094 
480 King Street 
Littleton, MA 01460 



SINCE 1973 



IN MASSACHUSETTS CALL <617) 486-3193 



TRS-80 is a registered trademark of Tandy Corp. 
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FEATURES 



=3 World Trader/Daw'd Compton 

GAME A nonviolent adventure of buying and selling 

3 Receipt File/ Bill Tottingham 



BUSINESS Print receipts and save to disk for tax purposes 
I Workout/ William Talada 



HOME HELP A 15-minute exercise instruction 

SI CoCoflow: CoCocad Expansion/ Dennis Page 

PROGRAMMING UTILITY An aid for drawing flow chart diagrams 

3 Rule of 78s/C/arence Whaley 



FINANCE Determine early pay-off amounts on installment loans 
=1 TV Shows/ Bill Bernico 



ENTERTAINMENT A computer hacker-couch potato peace treaty 
s] Kung Fu Fighter/Larry Wolcott 



GAME Defend yourself with deadly kicks and punches 
si Cash vs. Financing/ft/// Bernico 



FINANCE The economic advantage 

3 Home Budget Analysis/G/en Dufur 

FINANCE Forecasting personal finances 

ij§] Analyzer/ Martin H. Goodman 



DISK UTILITY Examining disk file structure 
=1 Varlist/ Hans Schulz 



PROGRAMMING UTILITY An easy way to list program variables 
=0 Marquee/Cftuc/c Poynter 



PROGRAMMING UTILITY Put your program up in lights 
=1 Saucer/Allen B. Carlisle 



GAME A void those flying saucer people 
^3 Expense Tracking and Management/Edd/e Hill. 



BUSINESS Providing budgetary analysis for accounts 
?=] Mortgage Planner/Edward ft. Carson 



FINANCE ThejoyS of early amortizaton 



.18 
.22 
.26 
.31 
.36 
.49 
.66 
.71 
.76 
84 
92 



101 



108 



122 



163 



122 



Cover illustration copyright ® 1986 
by Fred Crawford 



r^-i The small cassette tape 
symbols beside features 
and regular columns indicate that 
the program listings with those 
articles are on this month's rain- 
bow on tape, ready to CLDflD and 
RUN. For full details, check our 
rainbow ON TAPE ad on Page 230. 



NEXT MONTH: As spring commences, April is the perfect month to plant 
our new Home Help issue. We'll shower you with programs to accommodate 
the home and its activities. And, if that's not enough to get your feet wet, we'll 
also reveal the two grand-prize winning programs of our Third Annual 
Adventure Contest and announce the names of the remaining winning entries. 
Look to the rainbow to make your "home sweet home" with the best articles, 
programs and product reviews for your Color Computer. 
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[=] BASIC Training/ Joseph Kolar^ 
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A simple technique for creating animation 

Building March's Rainbow/ Jim Reed 

Managing Editor 's comments 

Delphi Bureau/ John R. Curl 

New forum commands 

Earth to Ed/Ed Ellers 



16 



Beam up those "tech " questions 

Isil Education Notes/Sfei/e Blyn 

Building language arts skills 

Education Overview/ Michael Plog, Ph.D. 



Educating with electronic communications and research 
PRINT#-2,/ Tamara Dunn 



210 
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152 
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Your Co Co: An investment for easing the high-tech pace 

Turn of the Screw/ Tony DiStefano 

An introduction to timing 

L=] Wishing Well/Fred Scerbo 



62 



157 



Creating Hi-Res graphics title screens 

DEPARTMENTS 



Advertiser Index 

Back Issue Information 

CoCo Cat 

CoCo Gallery 

Corrections 



Letters to Rainbow 
One-Liner Contest 
Information 
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The Pipeline 

Rainbow Info 

Received and Certified 
Scoreboard 



Scoreboard Pointers . 
Submitting Material 
to Rainbow 
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These Fine Stores 
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RAINBOWTECH 



Accessible Applications/fl/charc/ White- 
Firing up BASIC09 

Barden's Buffer/ William Barden, Jr 

Listening with assembly language 

Downloads/ Dan Downard 



226 



237 



214 



Answers to your technical questions 
The Utility Room/Brian A. Lantz 



216 



Errors, error messages and error conditions 

"KISSable OS-9" will return next month. 

PRODUCT REVIEWS 

Product Review Contents 
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LETTERS TO THE 





Is CoCo Involved? 



Editor: 

There has been a burning question that I 
have had for quite some time and have never 
seen it asked in the "Letters to Rainbow" 
section. I've always wanted to know exactly 
how much is the CoCo involved in the 
production, publishing, editing and writing 

Of THE RAINBOW? 

Also, I have seen many explanations on 
how to make my CoCo I handle a fast POKE, 
but I have never been able to find it on my 
board (I'm referring to C85). Where is this 
hidden wonder? I own an 'F' board. 

Sieve Haughey 
Whitefish Bay. Wl 



Editor's Note: Most of our con- 
tributors use CoCos, not only for 
programming, but the write-ups as 
well. We use the CoCo here to 
print out listings and to load arti- 
cles done on CoCo word proces- 
sors and transfer them to our 
typesetting machines. Plus, many 
"in-house" columns such as 
"Building a Rainbow," "Earth to 
Ed" and "Downloads" are com- 
posed on the CoCo. An average 
issue probably involves more than 
a hundred different Color Compu- 
ters when you consider reviewers 
and even writers to this Letters 
column also use the CoCo. 

While your board may be cap- 
able of using the high speed POKE 
without any modification what- 
soever, depending on the condition 
of your chips, if you need to clip 
capacitors, the ones to clip on the 
'D' and 'E' boards are the C73, C75 
and C85 (the latter is located near 
the internal ROM Pak connector). 

THE RAINBOW March 1985 



For the 'F' Board (also called the 
TDP, ET and NC) clip one side of 
C36, C37 and C30. You see, they 
renumbered the capacitors on the 
'F' board. 



CoCo-VCR Connection 

Editor: 

I am interested in hooking my CoCo to 
my VCR for titling and animation. Will 
articles of this nature be found in the new 
VCR magazine or would they be shown in 

THE RAINBOW? 

John H. Carstens 
Toms River. NJ 

Editor's Note: Our new VCR mag- 
azine places the emphasis on enter- 
tainment and will have little, if any, 
hardware material. So, keep read- 
ing THE rainbow for this sort of 
thing. 



BACK TALK 



Editor: 

In the July 1 985 issue [Page 8], I read the 
letter from Tim Jay of St. Petersburg, 
Florida. He was wondering if a universal 
program for the different types of computers 
existed. 

In the Netherlands, the National Broad- 
casting Station (NOS) broadcasted pro- 
grams for four types of computers a long 
time ago. Then more and more computers 
became popular and they were not able to 
broadcast general interest programs for each 
type. After some thinking, they found a 
solution. They invented a universal language 
that uses commands available for each 



computer — no matter what type BASIC they 
use. They called it BASICODE. It consists 
of two programs: a basic file to make it 
possible for each computer to use the same 
BASIC statements, and an M L routine to save 
the program in a "universal way" on tape. 

This means it is possible to transfer BASIC 
programs to another computer by the use of 
the ML routine. If this BASIC program is not 
written in the BASICODE protocol, you 
have to convert the different statements to 
your basic version. 

If you are interested in the BASICODE 
program, please write me at Eikenlaan I, 
4641 GB Ossendrecht, the Netherlands. The 
program is written for many computers such 
as IBM, Models 1 and 3, Commodore, 
Spectrum, MSX and the CoCo. 

Please continue with your excellent mag- 
azine. It is our only source for information 
on the Color Computer. 

Jorgen te Giffel 
the Netherlands 

We Stand Corrected 

Editor: 

I noticed the letter in the December 1985 
issue [Page 9], by Greg Garnett. You said to 
change 90 and 100 to: 

90 CS=C$+".bas" 
100 RUN C$ 

It should read: 

90 C$=CS+".bas" 
100 RUN ""+CS 

If you don't include the quotation marks 
BASIC will think it is a line number and print 
a UL error. I hope this is helpful to other 
CoCo fanatics out there. 

Ezra Storv 
Woodstock. NY 



Editor: 

I am writing in response to Greg Garnett's 
letter [December 1985, Page 9]. This pro- 
gram will do exactly what he wants to do and 
with fewer lines. I have been using this as a 
hello program now for some time and found 
it to work nicely. 1 tried the program listed 
with the corrections that you suggested. 1 
found that the changes will not work with 
Disk BASIC. 

5 CLS 

10 PR I NT "HELLO" 
40 DIR(0) 
50 PRINT"PLEASE ENTER THE NAME OF 

PROGRAM TO RUN" 
G0 INPUT CS 
70 CSS=CS+'VBAS" 
80 LOAD CS,R 

Clay Smith 
Williamstown. NJ 

Editor: 

Thanks to Mike Sweet and THE rainbow 
for the "Cheap Keyboard," December 1985, 
Page 208 for the Deluxe Keyboard. I got one 
of the last ones in Boston. Instead of bending 
the pins, which can damage the board, I 
bought a 34-pin Header Connector (Radio 
Shack No. 276-1529) for S3. 19. Place the 
ribbon connector, backed up by a thin strip 
of plastic, between the two rows of contacts 
at the rear of the plug. Pull a stretched-tight 
rubber band between the cable and the 
plastic strip; as it shrinks in length it expands 
in thickness, pressing the conductors against 
one bank of contacts. Now let's have some 
articles or tips on the Deluxe Keyboard. 
Please keep up the experimental do-it- 
yourself approach. 

Alfred Rubio 
Somerville, MA 

Editor: 

I'd like to respond to a letter I saw in your 
January 1986 issue [Page 8]. Haskell Brodek 
asked about tape to disk transfer programs. 
One word of warning. If you use such a 
program and that program automatically 
transfers the tape program to disk using the 
tape-saved name, you could be in for some 
problems. It doesn't happen very often, but 
when it does, it causes some extra work for 
the user. 

I'm talking about tape-saved programs 
that use an extension as part of the title 
Several good examples are found on the 
January 1986 issue of RAINBOW ON TAPE. 
These include SCF'EDI, SMF/EDI, SUL'EDI 
and SMP'EDI. There was also one on the 
December 1983 issue called D'BAS. 

When automatically transferred from 
tape to disk, the directory ends up looking 
like this: 

SCF-'EDI 'BAS B 3 

SflF'EDI 'BAS B 4 

SUL'EDI 'BAS B 4 

5UL/-E0I 'BAS B 2 

Since disk programs can't have two exten- 
sions, once it's transferred to disk, you'll 
never get it back off again. You'll have to do 
aDSKINIO and start over. You can't even kill 
one of these programs. Your best bet is to 
use Roger Schrag's "A Tape to Disk 
Transfer Vehicle" [Page 48], a transfer 



program from the January 1984 issue. It 
allows you to give the disk-saved program 
any name you like. I hope this saves some- 
one some undue frustration. 

I'll be attending RAINBOWfest in Chi- 
cago on Sunday, May 25. I hope to meet 
some of my pen pals or anyone else inter- 
ested in "talking shop." See you there. 

Bill Bernico 
Sheboygan, W 



Handbook Requested 

Editor: 

I would like to get the Delphi Handbook 
and command card. The advertisement says 
I can order it while online, but how can I 
order it without knowing the command to 
doit? 

I also await the next Simulations issue. 1 
enjoy it when you put the top winners' 
programs in the rainbow. Also, looking at 
the back issue order form, I see you haven't 
had an Adventure issue. And, if you follow 
through with P. Giodano's idea of a "Best 
Of issue ("Letters to Rainbow", Page 8), I 
think it would be nice to include all pro- 
grams that won first prize in all of your 
contests. 

Brandon Rhodes 
Andover, MA 

Editor's Note: There are two ways 
to order the Delphi Handbook. If 
you haven't already signed up on 
Delphi, when you do so you'll be 
asked whether or not you want to 
buy the package. If you've already 
signed up, you can order the Del- 
phi Handbook by sending a mail 
message to SERVICE. Either way, 
the cost will be billed to your 
Delphi account. Any questions 
you might have should be directed 
to Delphi Customer Service; their 
toll-free number is (800) 544-4005. 
Winners of the Third Annual 
Adventure Contest will be an- 
nounced in the April 1986 issue. 
February 1984 was our latest Ad- 
venture issue. 



HINTS AND TIPS 



Editor: 

I found a flaw in the program Christmas 
Songs (December 1985, Page 36). You can 
barely hear the music, even if you have the 
TV volume turned all the way up. The 
following line eliminates this problem and 
the other problem of the screen turning pink 
after you run the program. 



225 POKEG5315,230 



Roy Geeo 
Hot Springs, AR 



Editor: 

I recently purchased a used MC-10 and 
was making backup copies of the programs 
I received with it. When it came to backing 
up the machine language tapes, there was no 
CSAVEM command. I discovered that if you 



CLOADM an MC-10 machine language tape 
on a CoCo 2 64K, you could PEEK the 
necessary locations to find the start, end and 
exec addresses and CSAVEM to tape. Then 
you have a backup and can run it on the MC- 
10 as you would any other machine language 
tape. 

Kevin Schmidt 
Arkdale, WI 

Automatic Hangup 

Editor: 

For those who use the Radio Shack 
Modem II, I have a command that will hang 
up the modem automatically. This comes in 
handy if you are into running a BBS. This 
command is POKE &HFF20 , 0. If you use this 
with a remote driver you will have to put a 
FOR X=1TO2000:NEXT command right after 
the poke. 

Timothy Doktorski 
Jersey City, NJ 

Editor: 

Here is another possible solution to the 
cassette motor drive problem. 1 overcame 
the problem by adding a push-button switch 
to the cassette recorder. This will bypass the 
mike jack that controls the cassette drive 
motor. In order to be able to hear the tape, 
I added a 2200 ohm resistor across the ear 
jack. I can then hear the tape when the 
volumn is up all the way, but it is not loud 
enough to be bothersome. 

To find the points to connect to, use an 
ohmmeter. When an open cable is plugged 
into the cassette jack, the contacts will open 
up. These are where you solder your wires. 

Denis Santerre 
E. Holden, ME 

Editor: 

I recently purchased a Royal Beta 8100 
typewriter with an IF600 adapter box and 
a Color Computer adapter cable. Initially, 
I was unable to get the typewriter to print 
using either PRINTB-2, " " or through my 
Telewriter-64. After quite a bit of experi- 
mentation with the switch block in the 
adapter box, I was able to get the typewriter 
to print by setting the switches to get the 
following status, obtained by interrogating 
the interface box: 

STATUS 
PROM designation: EFFC 03-01 
Date: 12/10/84 
Interface: V24 (RS 232 C) 
Baud rate: 600 
Data format: 8 bit 
Parity: off 

Protocol: DC 1/DC3 
Control line: DTR 
DSR: off 
Auto LF: on 
Auto CR: on 
Select In: off 
Form length: 60 
Character set: US2 

This may be of use to someone else having 
the same problem. 

Jon Buchanan 
Troy, IL 
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Biblical Books 

Editor: 

As a pastor, I use my CoCo quite exten- 
sively for word processing and utilize the 
capabilities of Telewriler-64 to the fullest. I 
have written two books and numerous 
sermons and have found the CoCo more 
than adequate. 1 would like to let anyone 
who may be interested to know that copies 
of the two books are available on disk. Book 
one is entitled An Introduction to the 
Doctrines of Grace and is on one disk. Book 
two is entitled Portraits of Christ: As 
Painted in John's Gospel and is on two full 
disks. All disks are in Telewriter binary 
format. Anyone wishing copies should send 
three blank disks and a return mailer with 
postage affixed to 221 Highview Drive, 
63011. 

The material is copyrighted, but those 
who receive the disks may feel free to use it 
as they wish. Donations for the material 
would be appreciated, but I will gladly 
provide copies for anyone who wishes to 
have them. 

Lastly, my thanks to THE rainbow staff 
for a great magazine. I would like to suggest 
that an article be written on how people are 
using the CoCo in various ministry activi- 
ties. 

Pastor Mark Camp 
Ballwin, MO 



REQUEST HOTLINE 

Editor: 

I would like to know if anyone has soft- 
ware that emulates a VT-100 Digital Equip- 
ment Corp. CRT. If so, please write to me 
at 2410 Imperial Oaks, 52761. 

Joe Barnard 
Muscatine, IA 

Editor: 

I would like to be in contact with someone 
who has interfaced a Digital LA36 Decwrit- 
er II with a Radio Shack Extended BASIC 
computer. I have a Decwriter with no 
interfaces. 1 need the wiring drawings and 
directions. Please contact me at 114 Kenneth 
Drive, 15626. 

William A. Walker 
Delmont, PA 



In a Screen Print Pinch 

Editor: 

My teacher and I have been conducting 
a computer course at our school for three 
years. We were doing fine until someone 
took our screen print program last summer. 
Thus, we had to buy another only to dis- 
cover that Radio Shack has discontinued the 
model we previously used. The replacement 
we found is too slow, which increases 
printing time. 

Does anyone know where we can get the 
older model or a faster screen print program 
for the Tandy D MP- 1 30? The older Cat. No. 

8 THE RAINBOW March 1986 



is 26-3021 and the new model's Cat. No. is 

26-3121. Write to us at Connersville Junior 

High School, 1900 Grand Avenue, 47331. 

Mike Cramer and Gary Keegan 

Connersville, IN 

Lie Detector 

Editor: 

1 need help. My math teacher challenged 
me to build a CoCo lie detector. 1 have no 
idea where to start. I would appreciate any 
help. If possible, I would like it to use a 
finger clip. My address is 2833 Jackson Pike, 
45103. 

Chris Schneider 
Batavia, OH 

Jogger's Log 

Editor: 

I am looking for a program that will let 
me combine my hobbies of running and 
computering. I need a way to keep track of 
mileage, etc., in a type of training diary. 

I have seen a few programs commercially 
available for some other computers (Apple, 
IBM, etc.), but I haven't found anything for 
the CoCo. Anyone knowing of one can write 
me at 101 Fourth Avenue, 25701. 

Steve Clark 
Huntington, WV 

Editor: 

I would like to have a program to log Ham 
Radio contacts listing calls, names, dates, 
states and countries. If anyone has a pro- 
gram, please contact me. I am a Ham and 
would like to keep all my logging contacts 
on my CoCo. I would also like to see more 
programs for the Ham. Write to me at 6429 
Main Street, 54410. I have 64K ECB and 
cassette. Also, I would like to hear from 
someone who has a code program of some 
kind. 

Kim G. Smrstick 
Arpin, WI 

Editor's Note: See "CoCo's Quick 
Station Log" on Page 44 of the 
November 1985 issue. 



OS-9 Testimonial 

Editor: 

RAINBOW is the flip side of "whenever 
things cannot possibly get any worse, they 
will." Every time I start thinking you guys 
have peaked out, you pull another handker- 
chief out of your sleeve. Congratulations on 
Brian Lantz's articles. Now we have Dale 
Puckett, who covers the whole OS-9 spec- 
trum, and Mr. Lantz, who concentrates on 
programming. What more could we ask for? 

Well, for one thing, how about BASIC09 
programs along the lines of such classics as 
Roach, Surface, Keyhomher and anything 
by Fred Scerbo? Let's shake the notion that 
OS-9 is an inherently serious, business 
applications system. Just what did y'all have 
in mind when you bought those Color 
Computers, anyway? OS-9 has some out- 
standing Hi-Res graphics routines. Let's see 
them put to use. 

Fred Saw telle 
Huntsville, TX 



INFORMATION PLEASE 

Editor: 

Is there any way to save programs down- 
loaded with the Radio Shack RS-232 Pro- 
gram Pak to disk using the Multi-Pak 
Interface? Any help would be greatly appre- 
ciated. You can write me at 622 Perdido 
Drive, 75043. 

Eric Hedstrom 
Garland, TX 

Editor: 

I am desperately looking for a FORTRAN 

compiler for CoCo. If you know of one, 

please let me know. I would be appreciative. 

Write me at 2300 Olinville Avenue, 10467. 

Benjamin M. Fine 

Bronx, NY 

Editor: 

At this time, I am considering purchasing 
a Radio Shack Ink-Jet Printer CGP-220 to 
go with my CoCo 2 computer. However, 1 
am concerned about being able to use it to 
print out all of the graphics I have accum- 
ulated using the graphics program from the 
article entitled "The Art of Joystick Paint- 
ing," by Brian Preble, on Page 97 of the 
October 1984 issue. I very much like Brian's 
program and would like to be able to use the 
CGP-220 printer in making hard copies of 
all the graphics I have saved on tape. I do 
understand that the printer comes with a 
special screen print utility, but I question 
whether or not this utility works with Brian's 
program. If anybody can help me, I would 
greatly appreciate it. My mailing address is 
P.O. Box 71, 04957. 

Chet Lonnquist 
Norridgewock, ME 

Editor: 

Soon after I bought our Epson RX-80 F/ 
T the LX-80 with near letter-quality printing 
came out. Does anyone know if: a) the 
printer can be modified: b) any software 
exists that would do the job for me? I have 
both Elite Word and VIP Writer. 

Also, does anyone know why some of my 
printer lines are occasionally wavy? Some- 
times the 'a' line will not be quite straight 
with respect to the others. My address is 
2330 Lakeland Avenue, 53704. 

Paul Whiting 
Madison, WI 

Editor: 

I am a proud owner of a 64K. ECB CoCo 
with an FD 500 disk drive and a DCM-3 
modem. I have a communication program 
called Autoterm that takes close to five 
minutes to load in on cassette. I want to copy 
this from tape to disk. It would be a lot faster 
and I don't want to buy the same program 
again. This program is machine language 
and self-executing. Would Radio Shack's 
EDTASM+ allow me to do this? How can 
I do this? My address is RR 3 Box 376, 
62966. 

Bryon E. Lawrence 
Murphysboro, IL 

Editor's Note: Read "A Tape To 
Disk Transfer Vehicle" by Roger 
Schrag, January 1984, Page 48. 



Radio Shacks Color Computer 2 s 

WE ON 
OUR BEST! 

64K Memory! Extended BASIC! 
Cut $ 20...new low price $ 199.95 



The Color Computer 2 is an af- 
fordable computer that allows you 
to write programs tailored to your 
personal and household needs. It's 
ideal for small-business and pro- 
fessional uses alike. With the 
built-in Extended BASIC lan- 
guage, you can access 32,000 
characters of memory. To access 
the full 64K memory, simply add a 



disk drive and the optional OS-9 
disk operating system. 

The powerful Color Computer 2 
(26-3127, was 219.95 in Cat. RSC- 
15) creates detailed color graphics 
from simple, one-line commands, 
and is ideal for drawings, designs, 
charts, engineering diagrams and 
even animation! 




Ready-to-run software can help 
you set up personal and house- 
hold budgets, create a household 
inventory, keep track of your in- 
vestments, write letters and re- 
ports and record recipes. 

With a wide range of educa- 
tional software available, your 
children can use the Color Com- 
puter 2 to help strengthen their 
math, spelling and reading skills. 
The family can even play exciting 
computer games. The system 
attaches to any TV and is easily 
expanded. 

Get the Color Computer 2 and 
your family will immediately start 
to enjoy the advantages of home 
computing . . . together! 
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Radio /hack 

The Technology Store 

A DIVISION OF TANDY CORPORATION 



Send me a new 
1986 computer catalog 

Mall To: Radio Shack, Depl. 86-A-903 
300 One Tandy Center. Fort Worth. Texas 76102 




Name 

Company _ 
Address _ 
City 



State 

Telephone . 



.ZIP. 



TV not included. Price applies at Radio Shack Computer 
Centers and at participating Radio Shack stores and dealers. 



A CoColess CoCo Fan 

Editor: 

Here's one Atari user who also wishes he 
had a CoCo. My respect to rainbow, Radio 
Shack and the users for upholding such an 
excellent computer. 

I am an electronics fanatic and a 6502 
expert in most cases. I would like to trade 
ideas with CoCo users on electronics pro- 
jects, and would like any type of 6809 
assembly listing. I want to convert these for 
the Atari. My address is 2404 Phoenix Hill 
Drive, 40207. 

Jay Yepuri 
Louisville, KY 



Teaming up for Adventure 

Editor: 

Is there anyone out there who has a good 
Adventure idea (scenario), but can't put it 
in a program? 

I have enough knowledge in BASIC to write 
a program, but lack ideas. Please send a 
detailed explanation of your idea, and 
together we'll produce a great Adventure. 
My address is 939 S. Harriet, 46151. 

Jim Cockrum 
Martinsville. IN 

KUDOS 

Editor: 

1 am writing this letter in the hopes of 
delivering some well-deserved kudos. The 
first I would like to extend to Colorware for 
their CoCo Max program. This has to be, 
without a doubt, the most user-friendly 
program I have acquired to date. As a 
programmer 1 am intrigued by the concepts 
utilized, and as a user I can finally let my 
creative juices flow. It is well worth the 
money and I highly recommend it to anyone, 
no matter how remote the need. 

The second kudos is to your magazine. 
With all the "computer envy" these days, all 
I have to do is let my friends thumb through 
the pages of your magazine and the discus- 
sion is all but over. Keep up the good work. 
SMI Jay Hebert 
USS Midway CV 41 
Yokosuka, Japan 

Editor: 

I wish to compliment you on the won- 
derful magazine you produce. There are 
many advertisers in THE rainbow and it's 
nice to know there are people other than 
Radio Shack who support the TRS-80 
Color Computer. When I purchased the 
October 1985 Graphics issue, I saw the usual 
games, reviews, rainbow Scoreboard, etc. 
What surprised me was the extra long 
"CoCo Gallery." It was a wonderful idea. I 
hope it will continue. 

Joseph Pendell 
Riverside, MD 



Newsletters 



Editor: 

I would like to announce the CoCo News- 
letter. The newsletter includes helpful PDKEs. 
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tips for solving Adventures, an occasional 
review on a new product and one or two 
programs. The newsletter is available to 
anyone worldwide. For more information 
write to me at Rt. 6, Box 293, 26505, or call 
(304)594-2791. 

Doug Wilburn 
Morgantown, WV 

Editor: 

The MC-10 Newsletter has grown from 
four pages to 10 pages, and we hope to 
someday produce a small magazine for the 
MC-10 computer. Since $6 a year [for dues] 
is sort of a tight budget to get a magazine 
started, we must raise our dues, which 
include subscription, to $12. Anyone wish- 
ing information on our club, please write to 
me at 4730 Cass Street, 92109. 

Jose J. Bray 
San Diego, CA 

Editor: 

I would like to tell THE rainbow readers 
about our newsletter. It is called Alternate 
Views. Although its main theme is science 
fiction, we cover a variety of topics, includ- 
ing computers (the CoCo, of course). For a 
sample issue and subscription information 
send 50 cents to 3735 Stark Street, 43906. 
The editor is John Redpath. 

Dale Roman 
Bellaire, OH 



Thanks for a fine publication. 

Anthony J. Michael 
Bryant, Wl 

Editor: 

I would like to express my thanks to 
Colorware, Inc. When I ordered CoCo Max, 
I received it in less than two days! I live in 
a very remote town and seven-day packages 
are not uncommon. Also, the package was 
tested and sealed, which shows individual 
service. Beware — never hit SHlFT-left arrow 
while a menu is on the screen; doing so will 
wreck your picture. 

Troy Curtiss 
Circle, MT 

Editor: 

I would like everyone to know about two 
companies who advertise in rainbow. 
Never, in all my life, have I been treated with 
such wonderful service and concern. Special 
thanks to Sugar Software and Don Dunlop. 
Also, my compliments to Computer Plus. I 
can't say enough about these people, who 
put service and customer satisfaction above 
everything else. 

Thanks for a fine publication. 

Anthony J. Michael 
Bryant, Wl 



BOUQUETS 



Editor: 

I would like everyone to know about two 
companies who advertise in THE RAINBOW. 
Never in my life have I been treated with 
such wonderful service and concern. Special 
thanks to Sugar Software and Don Dunlop. 
Also, my compliments to Computer Plus. I 
can't say enough about these people who put 
service and customer satisfaction above 
everything else. 



the rainbow welcomes letters to the 
editors. Mail should be addressed to: Letters 
to Rainbow, The Falsoft Building, P.O. Box 
385, Prospect, KY 40059. Letters should 
include the writer's full name and address. 
Letters may be edited for purposes of clarity 
or space. 

Letters to the editor may also be sent to 
us through the MAIL section of our new 
Delphi CoCo SIG. From the CoCo SIG> 
prompt, pick MAIL, then type SEND and 
address to: EDITORS. 



ARTS AND LETTERS 
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Envelope of the Month 



Tom Perrigo 
Pawhuska, OK 



Next to your computer, 





nothing beats 
a Tandy printer* 





Tandy printers make fine print quality, 
graphics and high performance affordable. 



For your best value and selection in 
top-quality printers, shop your local 
Radio Shack Computer Center. We've 
got what you need, whatever your print- 
ing requirements. 

Versatile Business Printer 

The DMP 430* (26-1277, $899) is a 
132-coIumn dot-matrix printer with an 
18-wire print head that delivers supe- 
rior correspondence characters. Choose 
from micro, italic and double-high fonts, 
as well as bit-image graphics. In the 
draft mode, the DMP 430 delivers a fast 
180 characters per second. 

Low-Cost, Triple-Mode 
Personal Printer 

The DMP 130* (26-1280, $349.95) 
lets you choose from word processing, 



data processing and dot-addressable 
graphics. Prints in four character styles: 
standard or italic cursive in draft or cor- 
respondence modes. 

Budget-Priced High Performer 

The DMP 105 (26-1276, $199.95) is 
ideal for data processing and general- 
purpose use. Features a bit-image 
graphics mode, too. 

High-Resolution Ink-Jet Printer 

The CGP 220 (26-1268, $599) quietly 
prints text and graphics in yellow, vio- 
let, red, green, cyan, magenta and 
black! And because there's no ribbon to 
wear out or become contaminated, the 
print quality remains excellent. 

See the complete selection of printers 
and accessories al Radio Shack today. 



Radio /haeH 

The Technology Store' 

A DIVISION OF TANDY CORPORATION 



r 



Free 1986 computer 

catalog! 

Send me a copy. 

Mail To: Radio Shack 

Depl. B6-A-903A 
300 One Tandy Cenler 
Fori Worth. Texas 76102 



Name . 



1 



Company _ 
Address _ 



City _ 
Slats . 
ZIP_ 



Phone . 






Prices apply at Radio Shack Computer Centers and at participating stores and dealers. DMP 430 requires special order at some locations. "IBM Compatible. 

IBM/Reoistered TM International Business Machines Corp. 
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Your CoCo: 

An Investment 

for Easing 

the High-Tech Pace 



A gentleman wrote in a few months back suggesting we publish a 
photograph of the behind-the-scenes people here at RAINBOW who 
are responsible for its creation each month. 

For our curious readers who've aspired to see the folks who make THE 
RAINBOW, you can refer to last month's (February) cover for one of those 
faces. With more modesty than I am able to express, I'll 'fess up that that 
surprised face is mine. 

Although I'm only one of the great crew we've got here, come deadline 
time we're all running around looking similar to that flabbergasted visage. 
Until we make a "family portrait," you've got some idea of what we look 
like. 

I had advanced notice for the making of that cover, so of course it was 
all planned and purposely captured on film. You can imagine the same 
expression appeared when I was unexpectedly asked to write this column. 
It was deadline week, too. 

But I've always welcomed serendipity into my life because it's an excellent 
way to learn; with that point made, on with the show . . . 

Learning is a constant process, an intrinsic part of living that can enrich 
the quality of our day-to-day existence. Every experience, be it good, bad 
or indifferent, can serve as a course in enlightenment. 

This kind of commitment to growth can be good philosophy in a world 
that's moving, changing and rearranging more quickly than the average 
person can keep up with. 1 believe at the very core of this accelerated pace 
is computer technology, forming today (before we even know it) the basis 
for our lifestyles tomorrow. 

OK, so this isn't a profound revelation, but this was the rational approach 
I tried to implement when, over a year and a half ago, I stepped into the 
CoCo world as a copy editor for THE RAINBOW. Feeling quite inadequate, 
not to mention intimidated, I had to keep reminding myself of the above 
stated logic when surrounded by the wonderful (and occasionally 
frustrating) world of computers. 

But, my "techno-fright" soon dissipated when I found the camaraderie 
that abounded in the CoCo Community, which made my transition into 
the computer world an easier task. 

I'm sure those who have been learning and discovering on their Color 
Computers can share this same sentiment. You obviously foresee these 
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the Color Computer Word Processor 



3 display formats: 51/64/85 

columns x 24 lines 

True lower case characters 

User-friendly full-screen 

editor 

Right justification 

Easy hyphenation 

Drives any printer 

Embedded format and 

control codes 

Runs in 16K, 32K, or 64K 

Menu-driven disk and 

cassette I/O 

No hardware modifications 

required 



THE ORIGINAL 



Simply staled. Telewriter is the most powerful 
word processor you can buy for the TRS-80 
Color Computer. The original Telewriter has 
received rave reviews in every major Color 
Computer and TRS-80 magazine, as well as 
enthusiastic praise from thousands of satisfied 
owners. And rightly so. 
The standard Color Computer display of 32 
characters by 16 lines without lower case is 
simply inadequate for serious word processing. 
The checkerboard letters and tiny lines give you 
no feel for how your writing looks or reads. 
Telewriter gives the Color Computer a 51 
column by 24 line screen display with true 
lower case characters. So a Telewriter screen 
looks like a printed page, with a good chunk of 
text on screen at one time. In fact, more on 
screen text than you'd get with Apple II, Atari, 
TI, Vic or TRS-80 Model III. 

On top of thai, the sophisticated Telewriter 
full-screen editor is so simple to use, it makes 
writing fan. With single-letter mnemonic 
commands, and menu-driven I/O and 
formatting, Telewriter surpasses all others for 
user friendliness and pure power. 
Telewriter's chain printing feature means that 
the size of your text is never limited by the 
amount of memory you have, and Telewriter's 
advanced cassette handler gives you a powerful 
word processor without the major additional 
cost of a disk. 



...one of i he best programs for the Color 
Computer I have seen... 

— Color Computer News, Jan. 1982 



TELEWRITER-64 



But now we've added more power to 
Telewriter. Not just bells and whistles, but 
major features that give you total control over 
your writing. We call this new supercharged 
version Telewriter-64. For two reasons. 



64K COMPATIBLE 



Telewriter-64 runs fully in any Color Computer 
— I6K, 32K, or 64K, with or without Extended 
Basic, with disk or cassette or both. It 
automatically configures itself to take optimum 
advantage of all available memory. That means 
that when you upgrade your memory, ihe 
Telewriter-64 text buffer grows accordingly. In 
a 64K casseite based system, for example, you 
get about 40K of memory lo store text. So you 
don't need disk or FLEX to put all your 64K 
to work immediately. 



64 COLUMNS (AND 85!) 



Besides Ihe original 51 column screen, 
Telewriter-64 now gives you 2 additional high- 
density displays: 64 x 24 and 85 x 24!! Both 
high density modes provide all the standard 
Telewriter editing capabilities, and you can 
switch instantly to any of the 3 formats wiih a 
single control key command. 
The 51 x 24 display is clear and crisp on the 
screen. The iwo high density modes are more 
crowded and less easily readable, bul they are 
perfect for showing you the exact layout of 
your printed page, all on lite screen at one 
time. Compare this with cumbersome 
"windows" that show you only fragments at a 
time and don't even allow editing. 



RIGHT JUSTIFICATION & 
HYPHENATION 



One outstanding advantage of the full-width 
screen display is that you can now set ihe 
screen width lo match the width of your 
printed page, so that "what you see is what 
you get." This makes exact alignment of 
columns possible and it makes hyphenation 
simple. 

Since short lines are the reason for ihe large 
spaces often found in standard right justified 
text, and since hyphenation is the most 
effective way to eliminate short lines, 
Telewriter-64 can now promise you some of Ihe 
best looking right justification you can get on 
the Color Computer. 



FEATURES & SPECIFICATIONS: 



Printing and formatting: Drives any primer 
(LPVII/VUI, DMP-100/200, Epson, Okidata. 
Centronics, NEC, C. Itoh, Smith-Corona. 
Terminet, etc). 

Embedded control codes give full dynamic access to 
intelligent printer features like: underlining. 
subscript, superscript, variable font and type size, dot- 
graphics, etc. 

Dynamic (embedded) formal controls for: top, 
bottom, and left margins: line length, lines per page, 
line spacing, new page, change page numbering, 
conditional new page, enable/disable justification. 
Menu-driven control of these parameters, as well as: 
pause at page bottom, page numbering, baud rate (so 
you can run yout printer ai top speed), and Epson 
font. "Typewriter" feature sends typed lines directly 
to your primer, and Direct mode sends control codes 
righl from the keyboard. Special Epson driver 
simplifies use with MX-80. 

Supports single and multi-line headers and automatic 
centering. Print or save all or any section of the text 
buffer. Chain print any number of files from cassette 
or disk. 



File and I/O Features: ASCII formal files — 
create and edit BASIC, Assembly, Pascal, and C 
programs. Smart Terminal files (for uploading or 
downloading), even text files from other word 
processors. Compatible with spelling checkers (like 
Spell 'n Fix). 

Cassette verify command for su r e saves. Cassette auto- 
retry means you type a load command only once no 
matter where you are in the tape. 
Read in, save, partial save, and append Hies with disk 
and/or casseite. For disk: print directory with free 
space to screen or printer, kill and rename files, set 
default drive. Easily customized to the number of 
drives in the system. 

Editing features: Fast, full-screen editor with 
wordwrap, block copy, block move, block delete, line 
delete, global search and replace (or delete), wild card 
search, fast auto-repeat cursor, fast scrolling, cursor 
up, down, right, left, begin line, end line, top of text, 
botlom of text; page forward, page backward, align 
text, tabs, choice of buff or green background, 
complete error protection, line counter, word counter, 
space left, current file name, default drive in effect, 
set line length on screen. 

Insert or delete text anywhere on the screen without 
changing "modes." This fast "free-form" editor 
provides maximum ease of use. Everything you do 
appears immediately on the screen in front of you. 
Commands require only a single key or a single key 
plus CLEAR. 



. . . truly a state of the art word processor, . . 
outstanding in every respect. 

— The RAINBOW, Jan. 1982 



RAINBOW 

CERTIFICATION 
5t*l 



PROFESSIONAL 
WORD PROCESSING 



You can no longer afford to be without the 
power and efficiency word processing brings to 
everything you write. The TRS-80 Color 
Computer is the lowest priced micro with the 
capability for serious word processing. And 
only Telewriter-64 fully unleashes that 
capability. 

Telewriter-64 cosls $49.95 on cassette, S59.95 
on disk, and comes complete with over 70 
pages of well-written documentation. (The step- 
by-step tutorial will have your writing with 
Telewriter-64 in a matter of minutes.) 
To order, send check or money order to: 

Cognitec 

704 Nob Street 

Del Mar, C A 92014 

Or check your local software store. If you 

have questions, or would like to order by 

Visa or Mastercard, call us at (619) 755-1258 

(weekdays, 8AM-4PM PST). Dealer 

inquiries invited. 

(Add $2 for shipping. Californians add 6% 
state tax.) 

Apple II is a trademark of Apple Compulcr. Inc.: Atari is a 
trademark of Atari. Inc.; TRS-80 is a trademark of Tandy 
Corp; MX-80 is a trademark of Epson America, Inc. 



"And in your 
possession is the 
perfect tool for 
keeping abreast 
of this ever- 
changing 
phenomenon — 
the CoCo!" 



significant changes and the indica- 
tion that the trend for new technol- 
ogy will continue. What a challenge! 
And in your possession is the perfect 
tool for keeping abreast of this ever- 
changing phenomenon — the 
CoCo! 

Now, though I don't confess any 
inclination toward yuppiedom, I 
even have a CoCo at home. My only 
regret is that it doesn't do dishes. (I 
suppose it's ironic that I have a 
personal computer in my home, but 
nothing so modern as a dish- 
washer!) So, when Lonnie departed 
for vacation and requested that I fill 
in his usual slot on these pages, I 
enjoyed the prestige and pleasure of 
doing it on my CoCo. 

And for the first time since joining 
the staff here at RAINBOW, I truly 
had the opportunity to combine 
creativity with technology. Though 
in my particular job capacity 1 spend 
a great deal of time sorting through 



pages of technical jargon for RAIN- 
BOW articles and making them co- 
herent for the self-teaching user, up 
until now I've never been able to 
brandish my "writer's" pen (or, 
more appropriately, word proces- 
sor) for the pages of our magazine. 

This being our Business and Fi- 
nance issue, I think many of you, 
whether you're self-employed or 
working for a company, can relate 
to keeping up with the high-tech 
changes that are needed for main- 
taining and managing a business 
most efficiently. Its success or failure 
can depend on it, and you must use 
all the resources available. 

Your CoCo is an invaluable re- 
source for you, and in using it, 
you've learned how to take the 
necessary steps for acquiring tomor- 
row's knowledge. 



— Tamara Dunn 




Mouse Technological Software 
For The Color Computer! 



Many Companies call their 
Home and Business Software 
User Friendly . . . 



ONLY ONE CALLS IT 





Child's may 



TM 
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YOU COULD FALL IN LOVE WITH 

AUTOTERM! 

IT TURNS YOUR COLOR COMPUTER INTO THI 

WORLD'S 
SMARTEST 
TERMINAL 



< 



GOOD 
LOOKIN' 



AUTOTERM shows true upper/ 
lower case in screen widths of 32, 
40, 42, 51, or 64 characters with 
no split words. The width of 32 
has extra large letters. Scrolling is 
forward, backward, and fast. Block 
graphics pictures are displayed 
automatically and can be scrolled. 

The screen's top line shows 
operating mode, unused memory 
size, memory on/off, and caps- 
lock on/off. It also gives helpful 
prompts. 



SWEET 
TALKIN' 



KEY-BEEP can be on/off. Unac- 
ceptable keystrokes cause a lower 
pitched BOP! This ERROR- 
BEEBOP can be on/off. 

Talks to other computers with 
Full or Half Duplex; Baud Rate of 
110, 150, 300, 600, 1200; Parity as 
even, odd, mark, space, none; 7 
or 8 bit Word; any Stop Bits; all 
128 ASCII characters; true line 
Break; XON/XOFF protocol; and 
optional line-at-a-time transmis- 
sion. Able to send and receive 
text, block graphics, BASIC and 
ML programs. A 64K machine 
holds up to 45,000 characters 
(33,300 in HI-RES). 

DUAL PROCESSING lets you 
review & edit while more data is 
coming in. 

XMODEM for disk file transfer. 



Fully supports D.C. Hayes and 
other intelligent modems. 

Talks to your printer with any 
page size, margins, line spacing, 
split word avoidance. Embed your 
printer's control sequences for 
boldface, underlining, etc. Narrow 
text can be automatically spread 
out. 



You'll also use Autoterm 

for simple word processing 

and record keeping 

You can display directories, 
delete files, transmit directly from 
disk, and work with files larger 
than memory. Easily maintain a 
disk copy of an entire session. 

Compatible with TELEWRITER 
(ASCII) & other word processors. 



SMOOTH 
WALKIN' 



AUTOTERM moves smoothly 
and quickly between word proces- 
sing and intelligent terminal 
action. Create text, correct your 
typing errors; then connect to the 
other computer, upload your text, 
download information, file it, and 
sign-off; then edit the received 
data, print it in an attractive 
format, and/or save it on file. 

Editing is super simple with the 
cursor. Find strings instantly, too! 
Any operating parameter, such as 
screen width, can be altered at 
any time. Uncompleted com- 
mands can be cancelled. 




PUTTY IN 
YOUR HANDS 

The word processor can be 
used to create, print, and/or save 
on file your personal KSMs. They 
let AUTOTERM act like you. For 
example, it can dial through your 
modem, sign-on, interact, perform 
file operations, & sign-off; an 
entire session without your help. 
KSMs can answer the phone, 
prompt the caller, take messages, 
save them, hang-up, and wait for 
the next call. The KSM potential 
is unbelievable! 

NO OTHER COMPUTER IN 
THE WORLD CAN MATCH 
YOUR COCO'S AUTOMATIC 
TERMINAL CAPABILITIES!!! 



WHAT THE 
REVIEWERS SAY 

'AUTOTERM is the Best of Class." 

Graham, RAINBOW. 6/83 

"The AUTOTERM buffer system is 
the most sophisticated — and one of 
the easiest to use..." 
Banta, HOT CoCo. 9/84 

"Almost a full featured word 
processor..." 

Ellers, RAINBOW. 11/84 

"AUTOTERM's excellent error- 
handling routines, thorough docu- 
mentation, and logical, easy-to-use 
command structure make it stand 
out." 

Parker. HOT CoCo, 5/85 



AVAILABLE IN CANADA 

from 

Kelly Software Distributors 

Edmonton, Alberta 



CASSETTE $39.95 

DISKETTE $49.95 

Add $3 shipping and handling 
MC/VISA/C.O.D. 



PXE Computing 

11 Vicksburg Lane 

Richardson, Texas 75080 

214/699-7273 



Please hire the mentally retarded. They are sincere, hard working and 
appreciative. Thanks! Phyllis 



2 DISK DRIVES 

WITH DISK CONTROLLER 



ONLY $279 

LIMITED SUPPLY 

Price includes two 40 track, double density 
drives with case, power supply, cable and disk 
controller by HDS or J&M (specify RS or JDOS) 
OPTIONS 

ADOS ROM (for HDS) ADD $30 

A/B Switch Lets you switch between ROMS 
(lor HDS only) ADD $10 

J&M swflchable controller with JDOS 

and printer port ADD $30 

J&M with RS and JDOS ADD $40 



DISK CONTROLLERS 

HDS DISK CONTROLLER with RS ROM 
(same options as above) ONLY$119 

J&M SWITCHABLE DISK CONTROLLER 
with JDOS & PRINTER PORT ONLY $129 

J&M ORIG. CTRL. w/JDOS ONLY $99 



REAL TIME CLOCK 

Full featured, yet very easy to use. RTC-10 is a 
quartz-based. Time/Date clock contained in a 
compact ROM case with replaceable battery 
backup Compatible with any Color Computer I 
or II with or without a Radio Shack or any other 
Multi-Slot unit. 

Compatible with all known plug-in packs. To 
use it with another plug-in pack without using a 
Multi-Slot, order the Y-cable below. 
Completely assembled, tested and ready to plug- 
in and use, with programs included to set. read, 
and display the Time/Date on the screen or 
print It on your printer 
RTC-10 NOW $49.95 



ROM/PROJECT CASES 

3 piece unit with hardware. NOW $5.00 

PC BOARDS for 27XX lype proms for above case. 

NOW $3.75 

CALL FOR QUANITY DISCOUNTS 



COCO CABLES 

All have GOLD plated contacts. 

MULTI-SLOT EXTENDER CABLE - 40 conductor, 

6" to 15" (specify). 

STOP THOSE LOST CONTACT BLUES — 

ONLY $21.95 

Y-CABLE • 40 conductor, 1 ft. long Lets you 
connect the RTC-10 to a disk, voice or any other 
plug-in pack. 

ONLY $26.95 

DISK PACK EXTENDER CABLE - 40 conductor, 

2 ft. long. Not for use with Multi-Slot. 

ONLY $22.95 

DISK DRIVE EXTENDER CABLE ■ 34 conductor, 
2ft. long ONLY $21.95 

CUSTOM FLAT CABLES • Call 

Custom Computer Products 

6 Dogwood Court 

Goshen, NY. 10924 ppn 

(516) 783-7426 *^ 

ADD S3 00 PER ORDER FOR SHIPPING & HANDLING 
FOR COD. INCLUDE AN ADDITIONAL S3 00 
NY RESIDENTS MUST INCLUDE SALES TAX. 



BUILDING MARCH'S RAINBOW 

Please Mother Tandy . . . 

. . . we'd rather do it ourselves! 



Along while ago — it seems like ages — I got my first Color Computer 
"system." I had the fever. And, without even a hint of the long journey 
I was embarking on, less than 14 hours after I got my setup, I was off 
to Radio Shack on the first of countless treks to get something to enhance my 
configuration. Seems the old Vivitar tape recorder I had figured on using just 
wasn't quite right; I needed a computer tape recorder. Oh well, I thought, at 
least now I'll have everything I need. 

Whew, and double whew, was I ever wrong! All too soon, 1 had to have a 
Line Printer VII. Then the CoCo's own TV, a modem, lowercase board, new 
keyboard, 64K chips instead of "piggybacked" 16Ks, green screen monitor and 
video driver, one, then two disk drives, a new and better printer, bigger TV, 
RS-232 switch box, LEDs for this and that, 80-column board, RS-232 Pak, 
and power strips plugged into other power strips. Every time I pass through 
the electrical department of a hardware store I check the prices on power strips. 
The tangle of cables and cords and Y-everythings under my desk at home is 
mind-boggling — and I'm not even a true hardware hacker. 

I'm not alone! No sir. Wonder how many rolls of wire, spools of solder, red- 
handled pliers and yellow-and-black screwdriver sets Radio Shack has sold to 
CoCo owners? How many wire strippers'? Rolls of black electrical tape? How 
many of us are Radio Shack junkies? 

Well, looking back, I realize I've gotten an immense amount of pleasure out 
of adding all the "extras" over the last three years. Got my own customized 
configuration, too. While I have yet to get a Multi-Pak Interface or a 1200 Baud 
modem, and I use OS-9 only when I play Trivia Fever, my CoCo conglomer- 
ation dominates an entire room in my home, has its own separate, but still 
overloaded circuit and, count 'em, two phone lines and three telephones. While 
I'm not even in the same league with the hard-core solder artists, I'm sure there 
couldn't be another computer setup like it anywhere. It's been lovingly 
assembled, like a component hi-fi system. But my case is hardly unique. Your 
own custom installation is likely just as user-modified, eclectic and personalized 
as mine. It's the CoCo way to go. 

Yes, I also use a streamlined, doesn't-need-me-for-anything, state-of-the-art. 
hard-disk MS-DOS machine in my office along with my "work" CoCo, but 
it will never engender that special feeling I have for my CoCo at home. My 
CoCo "grew up" right here, and became part of the family. 

So, listen up, Tandy. Yes, we want memory, speed and software compatibility 
in that new machine you're dragging your heels on. But, just as importantly, 
we want hardware adaptability. Then, we're likely to be forgiving if it doesn't 
have a whatever; we'll just add one ourselves. Give us 512 million K. and our 
third-party suppliers will be bank-switching it in a month. Give us a bell; we'll 
make it whistle. 

A lot of us are going to break that warranty seal in a matter of minutes and 
we're going to be looking for something to modify, to upgrade, to amend, to 
redefine, to add on — and we'll most likely get the toggle switches, project 
boards and other nuts and bolts from the neighborhood Radio Shack. So, don't 
get too slick and don't worry so much about the loose ends. The CoCo crowd 
is clamoring for new challenges. Let's see it in the stores this summer! We'll 
smooth out any rough edges; it's a part of the natural evolution of a great 
computer. Enough of this fidgeting in the nest, shove that fledgling on out and 
the CoCo Community will teach it to fly! 



— Jim Reed 
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Have you yet subscribed to 

COCO TIME 

A monthly magazine on tape and disk 

Now every month you can get 8- 1 ready- 
to-run utilities, programming tips & hints, 
business applications, home management, 
tutorials, and educational programs. Also 
a Buy 'N Sell section and much, much 
more. NO GAMES, ONLY REAL STUFF! 

Each issue shipped to you 
by first-class mail. 

Programs written by computer wizards like 
Kishore M, Santwani and Gary T. Jes. 

SUBSCRIBER BENEFITS 

• Free advice/help on your Basic and ML 
programs, whenever possible. 

• Free Buy 'N Sell ads on computers and 
software 

• 10% off on all Microcom software/books 

• Subscribers encouraged to submit 
programs for inclusion. (Contact us.) 

EVERY YEAR YOU GET OVER 
$1 500 WORTH OF SOFTWARE. 

So Act Now! 



DECEMBER 1985 

• 40K BASIC (For 64K Cassette Users) 

• Super INPUT/LINE INPUT 

• Tape-to-Tape Copy (Basic and ML) 

• Mailing List (Disk Only; Many Functions) 

• Banner Maker (7" Letters/ Numbers) 

• Single Page LIST/DIR 

• Alpha Directory 

• Disk Tutorial (Part 1 of 10 part series) 

• Spell 'n Win Series 1 (400 words/4 
levels) 



The market value ot these programs is 
OVER $150, DOUBLE the price of our 
annual subscription. 

Subscription Rates 
(USA& Canada) 

Tape Disk 

1 Year $65 $75 

6 Months $40 $50 

Single $10 $15 

(Other countries add 25%) 

Pay by VISA/MC/Check/MO 



THOUSANDS OF PROGRAMMERS USE THESE 
UTILITIES DAILY. SHOULDN'T YOU? 




UTILITY ROUTINES 

for the TANDY 

& TRS-80 COLOR 

COMPUTER (Vol. 1) 

This powerful book for Basic and ML Pro- 
grammers, includes program explanation, 
memory requirements, and an annotated 
source listing for the utility routines given 
below. These routines if bought individually 
will cost you HUNDREDS OF DOLLARS. 

These are 100% Position Independent ML 
Utilities and require no ML programming 
knowledge. 

COMMAND KEYS: Access mosl Basic com- 
mands with 2 keystrokes. 
CURSOR STYLES: Create OVER 65000 Cursor 
Styles. 

FULL LENGTH ERRORS: Get full length error 
messages. 

KEY CLICKER: Ensure key input accuracy. 
PAUSE CONTROL: Put Basic/most ML pro- 
grams "on hold." 

REPEAT KEY: Repeat ANY key. 5 different key 
speeds 

REVERSE VIDEO (Green and Red): Eliminate 
eye strain. 

SPOOLERS 6K, 32 K.64K): Don't wait for those 
printouts, 32K Spooling Butter in 64 K. 
SUPER SCROLLER(64K Only): Save and exam- 
ine everything that scrolls off the text screen. 
AND MUCH, MUCH MORE! 

Compatible with 16K/32K/64K ECB/Cassette 

and Disk Systems and CoCo I and CoCo II 

BOOK $19.95 

THESE ROUTINES (READY-TO-RUN) 

ON CASSETTE/DISK: $24.95 
BOTH BOOK & CASSETTE/DISK: $36.95 

BEST OF 

COCO TIME '85 

(UTILITIES) 
1 8 best selected utilities from 
COCO-TIME 1985 like: In Memory 
Disk Drive for 64K Cassette Users, 
CoCo Disk Zap, Basic Program 
Packer, Tape Encryption (Basic), 
Disk Encryption (Basic), Graphics 
Screen Dump for DMP Printers, 
Basic Search, EZ Disk Master, 
Function Keys, Graphics Zoom, 
Tape Index System, 40 K Basic (for 
64 K Cassette Users), Alpha Direc- 
tory, Banner Creator, LIST/DIR 
Pause, Disk Mailing List, Super 
INPUT/LINE INPUT, and Tape-to- 
Tape Copy. 

Disk or Cassette, 
Only For $26.95 

disk anti-pirate $59.95 

hide-a-basic1.1 $24.95 

both $79.95 




500 POKES, PEEKS 
'N EXECS for the 
TRS-80 COLOR 
COMPUTER 

NEVER BEFORE has this information of vital 
significance to a programmer been so readily 
available to everyone. This book will help you 
'GET UNDERNEATH THE COVER' of the color 
Computer and develop your own HI-QUALITY 
programs. SO WHY WAIT? 

This book includes 
POKEs, PEEKS, and EXECs to: 

• Auto starl our Basic programs. 

• Disables most Color Basic/ECB/Disk Basic 
commands. 

• Disable BREAK KEY. CLEAR KEY and RESET 
BUTTON. 

• Generate a Repeat-Key. 

• Merge two Basic programs. 

• Transfer Rompaks to tape (for 64 K only). 

• Speed up your programs. 

• RESET, MOTOR ON/OFF from keyboard. 

• Restart your Basic program thru the RESET 
BUTTON. 

• Produce Key-Clicks and Error- Beeps. 

• Recover Basic progams lost by NEW, ?10 ERRORS 
and faulty RESET. 

• Sel 23 different GRAPHIC/SEMIGRAPHIC modes. 

• Sel 1 5 of the most commonly used Baud Rales 

• Allow you more plays in 23 of your favorite arcade 
games. 

• AND MUCH, MUCH MOREi 

COMMANDS COMPATIBLE WITH 1 6K/32K/64K 

COLOR BASIC/ECB/DISK BASIC SYSTEMS 

and CoCol and CoColl. 



ONLY $16.95 



Basic Programming Tricks Revealed- $14.95 
Color Basic Unravelled- $1 9.95 
Extended Basic Unravelled- $1 9.95 
Disk Basic Unravelled- $1 9.95 
All 3 Unravelled Books- S49. 95 
FACTS- $1 4.95 



Telewriter-64. (Cas) 49.95 

(DSK) 59.95 

TELEPATCH 17.95 

Q&%aj. 69.95 

COCO MAX II 79.95 

Y CABLE FOR COCO MAX 27.95 

PRO-COLOR-FILE 2.0 59.95 

DYNACALC 89.95 

AUTOTERM (CAS) 39.95 

(DSK) 49.95 

AUT-O- START 16.95 

DISKETTES 10 (SS/DD) 17.95 



MJF 



MICROCOM SOFTWARE 

P.O. Box 21 4 
Fairport, N.Y. 14450 
Phone (71 6) 223-1477 



Our software/books are available at all leading dealers in USA& Canada. 
To Order Order by phone & get a $2 refund for your phone call. 
VISA, MC, Check, MO. Please add $3.00 shipping and handling (USA & 
CANADA, other countries $5.00). COD add $2.50 extra NYS residents 
please add Sales Tax. Call for discounts on bulk quantities. Dealer 
inquiries invited. 



Issi. 



24-HOUR ORDER HOT LINE (7 DAYS A WEEK): (716) 223-1477 
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A nonviolent game for children . . . 



Set your Sails, 
Keep a Weather Eye out for Storms 
and Beware of the Jolly Roger! 



s 



By David Compton 



everal times I have seen in the pages 
of RAINBOW a plea for nonviolent 

games for children. World Trader 

is written for the young child, perhaps a 
second or third grader. Even younger 
children can use it with parental help. 
World Trader is a text Adventure, but 
the reading is kept to a minimum. It 
essentially seeks to teach children the names 
of some countries and the products for 
which they are best known. The player 
can't "lose" the game; he is just sent back 
to the beginning to start over. At the same 
time, there is an element of nonfatal 
excitement — pirates or storms may strike 



David Compton, chairman of the language depart- 
ment at an eastern prep school, lives in Suffield, 
Connecticut. Much of his programming lime is spent 
in developing foreign language programs. 



March 1986 THE RAINBOW 19 



at any moment, costing you money, or 
you may arrive in a country to sell your 
goods, only to find that your customers 
aren't interested! 

All of the instructions are given at the 
beginning of the game, but here's a 
summary: The idea is to earn $25,000 or 
more by buying merchandise in one 
country and selling it at a profit in 
another. Note that you may have only 
one of each item in your hold at any one 



time. Only four commands are needed 
by the player, GO, which presents a list 
of 10 countries you may travel to; BUY, 
which displays what the inhabitants 
have for sale (and reduces your cash on 
hand if you decide to buy); SELL, 
which disposes of your cargo and up- 
dates your cash; and INV, which in- 
forms you what's in your cargo hold. 

The player must also bear in mind 
that each time he uses the command 



GO, his funds are reduced by $100 to 
pay the cost of shipping and salaries for 
the crew. The first few trips should be 
made carefully, or the captain (you) will 
quickly run out of money. 

(Any questions about this program 
may be sent to the author at 252 N. 
Main Street, Suffield, CT 06078, phone 
203-668-5302. Please enclose an SASE 
when writing.) □ 




The listing: TRADER 

10 ' TRADER 

12 ' BY DAVID COMPTON, 252 N. MA 
IN ST., SUFFIELD, CT 06078 

13 'COPYRIGHT 1985 
2)3 CLS 

3)3 AA$="THE GAME OF" : BB$="WORLD 
TRADER" :PRINT@208-(LEN(AA$) *.5) , 
AA$:PRINT@272-(LEN(BB$)*.5) , BB$ 
40 FOR DL=1TO2000 : NEXT : CLS 
50 PRINT" IN THIS GAME, YOU STA 
RT WITH A SHIP AND $1000. THE O 
BJECT IS TO TRAVEL AROUND THE WO 
RLD, BUYING AND SELLING, UNT 
IL YOU EITHER RUN OUT OF MONEY 

OR EARN ENOUGH TO RETIRE." 
6)3 PRINT" EACH VOYAGE WILL COST 

YOU $100. IN ADDITION, YOU' 
LL HAVE TO BE CAREFUL OF PIRATE 
S AND STORMS." 
70 PRINT" YOUR CREW UNDERSTANDS 

THE COM-MANDS • GO ' , • BUY ' , ' SEL 
L 1 AND 'INV (INVENTORY)." 
80 PRINT§448, "PRESS ANY KEY TO B 
EGIN" 

90 IFINKEY$=""THEN90 
100 CLS 

110 WE=1000:W$=" $$##,###» 
120 DIMCN$(10,8) 

130 DATA BRAZIL, BRAZILIANS, COFFE 
E , 500 , , RELICS , 2000 , 



140 DATA HOLLAND, DUTCH, CHOCOLATE 

, 100 , , DIAMONDS , 10000 , 

150 DATA FRANCE, FRENCH, WINE, 1000 

,0, CHEESE, 250,0 

160 DATA GERMANY, GERMANS, BEER, 30 

0,0, CLOTHING , 1000 , 

170 DATA NORWAY, NORWEGIANS, FISH, 

200 , , CRYSTAL , 5000 , 

180 DATA CHINA, CHINESE, TEA, 100,0 

, SPICES, 2000,0 

190 DATA ARGENTINA, ARGENTINES, BE 

EF , 1000 , , HORSES , 3000 , 

200 DATA ITALY, ITALIANS, PASTA, 35 

0,0, STATUES , 6000 , 

210 DATA DENMARK, DANES, FURNITURE 

,5000,0, CLOTH, 1000,0 

220 DATA INDIA, INDIANS, IVORY, 850 

0,0, FABRICS, 700,0 

230 FORX=1TO10:FORY=1TO8:READCN$ 

(X,Y) :NEXTY,X 

240 PRINT "YOU BEGIN YOUR VOYAGE 

IN LONDON . YOU HAVE" ; : PRINTUSINGW 

$;WE 

250 PRINTSTRING$(32,"$") ; 

260 IFWE>24999THENPRINT"YOU HAVE 

" ; : PRINTUSINGW$ ; WE : PRINT "A SUCCE 

SSFUL VOYAGE! YOU RETURN TO ENGL 

AND IN TRIUMPH!": END 

270 PRINT" YOUR ORDERS , SIR?" 

2 80 INPUTO$ 

290 IFO$="SELL"THENGOTO420 

300 IFO$="BUY"THENGOTO560 

3 10 IFO$="GO"THENFORX=1TO10 : PRIN 

TX;CN$(X,1) : NEXT: GOTO 3 4 j3 

320 IFO$="INV"THENGOTO720 

3 30 PRINT" I DON'T UNDERSTAND, CA 
PTAIN":GOTO2 50 

3 40 INPUTDE:IFDE<1ORDE>10THEN2 50 
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350 GOSUB670 

3 60 CLS:L$=CN$(DE,1) : PRINT" YOU A 

RE IN ";CN$(DE,1) 

370 WE=WE-100 

380 PRINT"YOU HAVE" ; : PRINTUSINGW 

$;WE 

390 IFWE<0THENPRINT"WE'RE OUT OF 

MONEY, CAPTAIN. WE'LL HAVE T 
RETURN TO ENGLAND TO GET A LOA 
N . " : FORX=1TO2000 : NEXT : END 
400 GOTO250 

410 i ********SELL******* 
4 20 FORD=1TO10 : IFCN$ ( D, 5 ) =" 1"THE 
N450ELSENEXTD 

430 FORD=1TO10:IFCN$(D,8)="1"THE 
N450ELSENEXTD 

440 PRINT "YOU HAVE NOTHING TO SE 
LL.":GOTO270 

450 IFRND(10)=6THENPRINT"THE ";C 
N$(DE,2) ;" AREN'T": PRINT" INTERES 
TED IN BUYING. " : 0$="GO" : GOT03 10 
460 PRINT"THE " ;CN$ (DE, 2) ; " WILL 
» BUY "; 
470 FORX=1TO10 : IFCN$ (X , 5 ) =" 1"THE 
NPRINTCN$(X,3) : PRINT "SOLD FOR";: 
PRINTUS INGW$ ; VAL ( CN$ ( X , 4 ) ) + ( . 3 * V 
AL(CN$(X,4)) ) :WE=WE+VAL(CN$(X,4) 
)+(.3*VAL(CN$(X,4)) ) 
480 CN$(X,5)="0" 
490 NEXTX 

500 FORX=1TO10 : IFCN$ ( X , 8 ) =" 1"THE 
NPRINTCN$(X,6) :PRINT"SOLD FOR";: 
PRINTUSINGW$;VAL(CN$(X,7) )+(.3*V 
AL(CN$(X,7) ) ) :WE=WE+VAL(CN$(X,7) 
)+(.3*VAL(CN$(X,7)) ) 
510 CN$(X,8)="0" 
520 NEXTX 

530 PRINT"YOU HAVE" ;: PRINTUSINGW 
$;WE 

540 GOTO250 
550 i *******BUY****** 
560 PRINT"THE " ;CN$ (DE, 2) ; " WISH 

TO SELL: ":PRINTCN$(DE, 3) ,: PRINT 
USINGW$;VAL(CN$(DE,4) ) :PRINTCN$( 
DE,6) , : PRINTUS INGW$; VAL (CN$(DE, 7 

)) 

570 PRINT"WHICH WILL YOU BUY?" 
580 INPUTBU$ 

590 IFBU$<>CN$(DE,3)ANDBU$oCN$( 
DE,6)THENPRINT"THEY DON'T HAVE A 
NY FOR SALE" 

600 IFBU$=CN$(DE,3)THENIFWE<VAL( 

CN$(DE,4) )THENPRINT"NOT ENOUGH M 

ONEY":GOTO250 

610 IFBU$=CN$(DE,6)THENIFWE<VAL( 

CN$(DE,7) )THENPRINT"NOT ENOUGH M 

ONEY":GOTO250 

620 IFBU$=CN$(DE,3)THENCN$(DE,5) 



="1":WE=WE-VAL(CN$(DE,4) ) 
630 IFBU$=CN$(DE,6)THENCN$(DE,8) 
="1":WE=WE-VAL(CN$(DE,7) ) 
640 PRINT" YOU HAVE" ;: PRINTUSINGW 
$;WE 

650 GOTO250 
660 END 

670 CA=RND ( -TIMER) :CA=RND( 10) 
680 IFCA=1THENLO=RND(10)*10:PRIN 
T" YOU 'RE ATTACKED BY PIRATES DUR 
- ING THE VOYAGE. THEY STEAL SOM 
E OF YOUR MONEY. " : WE=WE-LO: FORDL 
=1TO4000 : NEXTDL: RETURN 
690 IFCA=2THENLO=RND(10) *10:PRIN 
T"A BAD STORM! SEA WATER DAMAGES 
YOUR CARGO. YOU'VE LOST $";LO; 
" IN MERCHANDISE . " : WE=WE-LO : FORDL 
=1TO4000 : NEXTDL: RETURN 
700 RETURN 

710 i ***********inv****** 
720 FORD=1TO10 : IFCN$ (D, 5) ="1"THE 
NPRINT CN$(D,3) 
730 NEXTD 

740 FORD=1TO10 : IFCN$ (D, 8) ="1"THE 
N PRINTCN$(D,6) 
750 NEXT D 
7 60 GOTO250 
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Co Co - Cooler £1 




Brings operating 
temperature 
to ambient, 
regardless 
of 

accessory 
load 

• Reduces 
tempera- 
ture of 

ENTIRE computer . 
just the SAM chip 

• Easy 1-minute installation 

• $44.95 



Companion Keyboard Cover $9.95 



Send For Free Catalog Of Co Co Software & Computerware 

• For Fastest Service Send Monev Order Or Certified Check 
• Add S2.50 Shipping For Continental U.S. 

• Add $4.00 Shipping For. AK. Hl.APO's. P.O. Boxes.&Canada 
• Add $15.00 Shipping For Overseas 
• Add S3.00 For 220-250 Volt Model 

• California Residents Add 6'A% Sales Tax 
• Add S3.00 For COD. 



REM Industries, Inc. 

9420 "B"LurlineAve., Chatsworth, CA 91311 

(818) 341-3719 
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By BiU Tottingham 



•■tail 

ha ve a nnn! ;/ " ^ yo I " SOft ^'"e "° need for a m ,/? f ' ater 
* " printer Th*. J u °iust ha„„ "Ui/jon rfnM„ 

■30 DjV|p. JOn /Cod «inthe 



tine 

830 

850 
860 
870 
880 



DJVfP-,00 

CH **U«> £n?h, aUd P ri "'er 

£2X221? 

C ^r a cter mode 



En'eringD 

After mafcin ar acter mode 

ia - You wij/ 

5/7/ Tottingham is an auto body worker who writes 
programs for children and specific business applica- 
tions. 
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then be asked the date. Enter it in the 
same format the example, shows, then 
press ENTER. You will then be asked if 
the information given was correct. 
(When entering new data you will 
always be asked if the information 
provided was correct.) 

Next you will be asked for a "Receipt 
number." You must enter a number. 
This is the number the program uses for 
filing. It also must be a number different 
from one already on file. The best bet 
is to give the receipt a number incre- 
mented by one over the preceding 
receipt. For the first one, enter 001. 

You will now be asked to enter "Re- 
ceived of." Here you may enter the 
name of your customer. 

Next comes the "Dollar amount 
paid." This is exactly what it says. Enter 
this like the example shows. 

Now we come to "Amount of Ac- 
count." This is the total purchase price. 
You can use the balance due from any 
previous payment of the same account. 
This will be printed on the receipt with 
the amount paid and a balance due. If 
the amount of account is the same as the 
amount paid, simply enter the amount 
paid here again if you wish. If not, press 
ENTER. 

Finally we come to the comment line. 
Enter anything you wish; however, it is 
customary to use this for what was 
purchased, or the nature of the transac- 
tion. If you are the purchaser, you might 
want to enter the name of the other 
party, so if the hard copy is lost you will 
still have the information come tax 
time. There is a 30 character space here. 

You now find yourself back at the 
main menu. If you want to examine the 
information to be printed and/orsaved, 
press '3'. If any of the information is 
wrong, press 'M' to return to the main 
menu and press '2' to re-enter all the 
data. If everything is correct, the receipt 
can be printed or saved to disk. Press 
'M' to get back to the menu. 




Figure 3 
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tells the printer to print two receipts. 
Before answering this prompt make 
sure your printer is on and ready to go. 
After printing, you will be returned to 
the main menu. Here you may save the 
data (if not previously saved), enter new 
data or look at and/ or load previous 
accounts. 

Entering Data from Disk 

To load data from disk, first get to the 
disk menu by pressing Ton the main 
menu. The easiest way to load is to press 
Tfrom the disk menu. A list of receipt 
numbers will appear on the screen 
preceded by a number; for example: 1) 
00 1 . To load receipt #00 1 , press ' 1 ' and 
ENTER and the file will load. If you 
already know the receipt number, press 



'2' on the disk menu and enter the 
number at the prompt. 

After loading, you will automatically 
be in the examine mode (Figure 3). 
From there you can print out a receipt, 
load a different receipt or enter new 
data. 

As with all programs, this one can be 
modified to your specific needs. Some 
ideas might be to incorporate a different 
filing system if you are in a higher 
volume business. To enter data faster, 
you could hack off everything after the 
line input statements in lines 240 
through 270 and in Line 280 after the 
BD$=STRS(BD) statement. A line could 
also be added in the printer routine that 
would print a line under the receipt for 
written comments. CI 



Saving to Disk 

If you are planning to save this data 
on disk, it can be done now or after 
printing the receipt. 

To save on disk, press Tfor the disk 
menu (Figure 2). Here again there will 
be five choices. Since we are saving 
data, press '3'. You will then be asked 
to press ENTER for save or 'M' for menu. 
After the save is completed, you will be 
returned to the main menu. 

Printing the Receipt 

To print the receipt, press '4'. You will 
be asked if you want a copy. Pressing 'Y' 



Figure 4 
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The listing: RECEIPT 



W 



10 
20 
30 
40 
50 



CLEAR 
CLEAR5000 
VERIFY ON 
DIMP$(35,2) 



170 . 
290 . 
440 . 
610 . 
840 . 
1090 
END 



.205 
.20 
.142 
.183 
..85 
.190 
..72 



120 
130 
140 



CLS : PRINT§46 , "MENU" : PRINT@165 
,"[1] DISK MENU ": PRINT @ 2 2 9," 
[2] ENTER NEW DATA" : PRINT§29 
3, "[3] EXAMINE":PRINT§357,"[ 
4] PRINT RECEIPT": PRINT @421, 
11 [Q] QUIT PROGRAM" 
60 AN$=INKEY$:IFAN$=""GOTO60 
70 IFAN$="Q"GOTO130 
80 IFAN$="1"GOTO140 
90 IFAN$="2"GOTO220 
100 IFAN$="3"GOTO520 
110 IFAN$="4"GOTO760 

GOTO60 

GOSUB570:CLS:END 

CLS :PRINT@44, "DISK MENU":PRI 
NT@165,"[1] DIRECTORY OF FIL 
ES":PRINT@229," [2] LOAD FROM 
DISK":PRINT@293,"[3] SAVE T 
O DISK":PRINT§357," [M] MAIN 
MENU":PRINT@421,"[Q] QUIT PR 
OGRAM" 
150 I$=INKEY$:IFI$=""GOTO150 

IFI$="1"GOTO1100 

IFI$="2"GOTO450 

IFI$="3"GOTO370 

IFI$="M"GOTO50 

IFI$="Q"GOTO130 

GOTO150 

'ENTER DATA ROUTINE 

GOSUB570 

CLS : PRINT§103 , "ENTER RECEIPT 
DATE":PRINT@13 6,"(EX. 6/25/85)" 
:LINEINPUT" ";D$:GOSUB 

3 40: PRINT© 3 20," -"D$"-" :GOS 
UB320 : IFI$="N"GOTO240 
250 CLS :PRINT§103, "ENTER RECEIPT 
#":PRINT@136," (EX. 001) "rLINEIN 
PUT" ";N$:GOSUB340:PRIN 

T§320," -"N$"-":GOSUB320:IFI 
$="N"GOTO250 

260 CLS : PRINT @ 10 3, "ENTER RECEIVE 
D OF":PRINT@134," (EX. JOHN Q. SM 
ITH) " : LINEINPUT" " ;RO$ :GOSUB3 4 
0:PRINT@320," -"RO$"-" :GOSUB 
320:IFI$="N"THEN260 
270 CLS :PRINT@100, "ENTER DOLLAR 
AMOUNT PAID":PRINT§134,"(EX. 259 
.99 OR 499) ": LINEINPUT" 
" ; DO$ : DO=VAL ( DO$ ) : GOSUB3 40 : PRINT 
@322," -";:PRINTUSING"$$###.##" 
;DO;:PRINT"-":GOSUB320:IFI$="N"T 
HEN270 



160 
170 
180 
190 
200 
210 
220 
230 
240 



280 CLS : PRINT @ 9 9," ENTER TOTAL AM 
T. OF ACCOUNT" :PRINT@135," (EX. 3 
02.43 OR 500) ": LINEINPUT" 

" ; TA$ : TA=VAL ( TA$ ) : BD= ( TA-DO ) 
: BD$=STR$ ( BD) : GOSUB3 40 : PRINT@3 2 3 
, " -" ; :PRINTUSING"$$#### . ##" ;TA 
; : PRINT"-" :GOSUB320:IFI$="N"THEN 
280 

290 CLS :PRINT@ 102, "ENTER COMMENT 

LINE":PRINT@134,"(EX. PART #357 

71) " : PRINT@223 , " } " : PRINT@192 , " [ " 

;:LINEINPUTC$ 

300 IFLEN(C$)>30GOTO360 

310 GOSUB570:GOTO50 

320 I$=INKEY$:IFI$=""THEN320 

330 RETURN 

340 PRINT@290,"YOU ENTERED-" : PRI 

NT@354,"IS THAT CORRECT? (Y/N)": 

RETURN 

350 GOTO50 

360 CLS: PRINT© 170, "LINE TO LONG" 

:FOR T=1TO500:NEXTT:GOTO290 

370 'DISK ROUTINE 

380 BD$=STR$(BD) 

390 CLS:PRINT@166,"HIT <ENTER> T 

O SAVE":PRINT@2 3 2,"OR <M> FOR ME 

NU" 

400 I$=INKEY$:IFI$=""GOTO400 

410 IFI$="M"GOTO50 

420 IFI$=CHR$(13)GOTO440 

430 GOTO400 

440 GOSUB570:CLS:GOSUB580:GOSUB7 

40 : GOSUB570 : GOTO50 

450 CLS :PRINT@170, "ENTER FILE #" 

:PRINT@330,"[M] FOR MENU" 

460 PRINT@242,"]":PRINT@23 6,"["; 

:LINEINPUTN$ 

470 Z=LEN(N$) :IFZ>5GOTO450 

480 IFN$="M"GOTO50 

490 CLS :PRINT@168, "LOADING #";N$ 

:PRINT@182 , STRING$ (10, 32) 

500 GOSUB570:GOSUB580:GOSUB750:G 

OSUB670 

510 TA=VAL(TA$) :DO=VAL(DO$) : BD=V 

AL(BD$) 

520 BD= (TA-DO) 

530 CLS:PRINT§1,"#";N$:PRINT@20, 

D$ : PRINTS 67 , RO$ : PRINT§ 13 1 , " AMT . 

OF ACCOUNT " ; :PRINTUSING"$$###. 

##";TA:PRINT§201,"AMT. PAID " ; : 

PRINTUSING"$$###.##";DO:PRINT@26 

3 , "BALANCE DUE " ; : PRINTUSING" $$ 

###.##" ;BD:PRINT@323, "COMMENTS: 

";c$ 

540 PRINT@458,"[M] FOR MENU" 
550 I$=INKEY$:IFI$="M"GOTO50 
560 GOTO550 
570 CLOSE#l: RETURN 
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580 OPEN"D ll / #l,N$,llp 
590 FIELD* 1, 10 AS XTA$,10 AS XD 
$,10 AS XDO$,10 AS XBD$,30 AS XR 
O$,30 AS XC$,10 AS XDT$ 
600 LSET XTA$=TA$ 
610 LSET XD$=DY$ 
620 LSET XDO$=DO$ 
630 LSET XBD$=BD$ 
640 LSET XRO$=RO$ 
650 LSET XC$=C$ 
660 LSET XDT$=D$ 
670 TA$=XTA$ 
680 D$=XDT$ 
690 DO$=XDO$ 
700 BD$=XBD$ 
710 RO$=XRO$ 
720 C$=XC$: RETURN 
730 RETURN 
740 PUT#1: RETURN 
750 GET#l: RETURN 
760 'PRINTER ROUTINE 
770 CLS:PRINT§133,"DO YOU WANT A 
COPY FOR" :PRINT@165,"FOR YOUR R 
ECORDS ALSO?" : PRINT@205 , " ( Y/N) " 
780 PC$=INKEY$:IFPC$=""GOTO780 
790 IF PC$="Y" THEN PC=2 
800 IFPC$="Y"ORPC$="N"GOTO820 
810 GOTO780 

820 CLS:PRINT@236, "PRINTING" 
830 POKE149,0:POKE150,41: • 1200BA 
UD 

840 FORPP=lTOPC 

850 U$=CHR$ (15) : 'UNDERLINING ON 
860 DU$=CHR$ (14) : 'LINING OFF 
870 E$=CHR$(31) : ' DOUBLE WIDTH/ ON 
880 DE$=CHR$(30) : 'D.W./OFF 
890 NO$="NO.":DT$="Date ":RC$="R 
eceived of " :DL$=" DOLLARS" 
900 AC$="AMT. OF ACCOUNT " 
910 AP$=" AMT. PAID " 
920 BD$=" BALANCE DUE " 
930 LF$=STRING$(2,10) :S$=CHR$(32 

) 

940 PRINT#-2,U$;STRING$(80,32) ;S 

TRING$(2,10) ;DU$ 

950 PRINT#-2,E$;NO$;DE$;U$;S$;N$ 

;S$;DU$;STRING$(46,32) ;E$;DT$;DE 

$ ;U$ ; S$ ;D$ ; S$ ; DU$ ;LF$ 

960 LR=LEN(RO$) :LS=(47-LR) 

970 PRINT#-2,E$;RC$;DE$;U$;S$;S$ 

;S$;S$;S$;RO$;STRING$ (LS,32) ;DU$ 

;LF$ 




E$;DL$;DE$ 

990 PRINT#-2,U$;STRING$(25,32) ;D 

U$;STRING$(28,32) ;"100" 



1000 PRINT#-2 , AC$ ; : PRINT#-2 ,USIN 

G"####.##";TA 

1010 C=LEN(C$) :CL=(32-C) 

1020 PRINT#-2,AP$;U$;:PRINT#-2,U 

SING" ####.##"; DO ;:PRINT# -2, DU$;S 

TRING$(15,32) ;"CMTS ";U$;C$;STR 

ING$(CL,32) ;DU$ 

1030 PRINT#-2 , U$ ; BD$ ; : PRINT#-2 , U 

SING"####.##»;BD;:PRINT#-2,CHR$( 

32) 

1040 PRINT#-2,CHR$(10) ;DU$;STRIN 

G$ (43 , 32 ) ;E$ ; "$" ;DE$ ;U$ ;STRING$ ( 

32,32) 

1050 PRINT#-2,U$;STRING$(80,32) ; 

DU$ 

1060 PRINT#-2,STRING$(10,10) 

1062 IFPC=2GOTO1065 

1063 GOTO 10 70 

1065 IFPP=1THENPRINT#-2,STRING$( 

38,10) 

1070 NEXTPP 

1080 GOTO50 

1090 CLS:END 

1100 CLS :• DIRECTORY ROUTINE 

1110 CLEAR 

1120 GOSUB570 

1130 FORZ=3T011 

1140 DSKI$0,17,Z,A$,B$ 

1150 X$=A$:GOSUB1190 

1160 X$=B$:GOSUB1190 

1170 NEXTZ 

1180 GOTO1280 

1190 F0RJ=1T0128STEP3 2 

1200 R=R+1 

1210 P$(R,1)=MID$(X$,J,8) 

1220 IFLEFT$(P$(R,1) ,1)=CHR$(255 

) THENR=R-1 : GOT012 80 

1230 IFLEFT$(P$(R,1) ,1)=CHR$(0)T 

HENR=R-1:GOTO12 60 

1240 P$(R,2)=MID$(X$,J+8,3) 

1250 IFP$(R,2)<>"DAT"THENR=R-1 

12 60 NEXTJ 
1270 RETURN 
1280 FORK=lTOR 

1290 PRINTUSING"##";K;: PRINT"] # 

";P$(K,1), 

1300 IFK=R THENPRINT, 

1310 NEXTK 

1320 LCN=480 

1330 PRINT @LCN, "LOAD WHICH FILE 

(M FOR MENU) " ; : INPUTP1$ 

1340 IFP1$="M"GOTO140 

1350 P=VAL(P1$) 

13 60 IFP<10RP>R THENLCN=448:GOTO 
1330 

1370 FILE$=P$(P,1) 

1380 N$=FILE$ 

1390 GOTO490 _ 
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HOME HELP 





Color Computer Workout 



By William Talada 






■t' 







fter many unsuccessful at- 
tempts to be home when an 
exercise program was on tele- 
vision, I finally decided that the 
only way I would exercise was if I had 
a program readily available to show me 
how to do each exercise and keep track 
of the time for me. Hence, Workout was 
developed. 

Workout is designed to give maxi- 
mum conditioning to the heart, lungs 
and muscles in the least amount of time. 
Just CLDflD or LORD and RUN. You will 
see credits and a title page displayed, 
and you are asked to enter your current 
exercise level. If you don't respond 
within five seconds, the program de- 
faults to an intermediate level, which 
can be changed by editing Line 150. 

Next, you will have time to warm up 
and stretch out to five different recom- 
mended exercises. After stretching, lie 
down and take your pulse for 15 sec- 
onds. The given resting pulse rate is for 
a healthy person. It should be your main 
goal to lower your resting heart rate. 

The instructions that follow the name 
of each exercise should be followed even 
if your television partner doesn't. There 
are 10 seconds of pause and 10 seconds 
of exercise repeated three times for each 
of the 15 exercises. Afterwards, there is 






Bill Talada has been programming in 
BASIC, COBOL and RPG II for two years 
now. He is mostly self-taught, program- 
ming only when he can sneak out of bed 
at 5 o'clock in the morning without 
waking his wife, Robyn. 
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time to take an exercise heart rate. If 
you don't reach the minimum rate, your 
workout was of little benefit to you. 
Again, the numbers are for a young, 
healthy person. Allow two beats less for 
every 10 years of age over 30. The 
program ends after a cool-down and 
recovery heart rate. The 15 minute 
workout lasts 23 minutes including 
warm-up and cool-down. 

As with all exercise programs, it is 
recommended that you check with your 
physician before undertaking Workout. 

(Any questions regarding Workout 
can be directed to Mr. Talada at 739 
Sunset Road, Wrightsville, PA 17368. 
Please include an SASE when writ- 
ing.) □ 




\ 
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The listing: WORKOUT 

10 'DOWN ARROW BYPASSES WARM-UP, 

TO CHANGE RELATIVE EXERCISES OR 

DEFAULT SPEED EDIT LINES 140-150 

20 CLEAR2000 : CLS : PCLS : PCLEAR8 

30 R$= M ND4R2E2R4F3D2G3U2H5F2L1D1 

BF3L1BD1NR2G1U1L1NU1L1H1U1L2 " : F$ 

="ND4R2E2R5F3D2G3L2E2U4H2BD2L1BD 

2L1U1BH1G1D2F1BR2R1BD2L3H2L2" 

40 PRINT© 13 5," BILL TALADA" : PRINT 

@ 168 /'PRESENTS" 

50 D$="D20R3E3F3R3U4BE3F2R1E2U6H 

2L1G2D6BG3F4R3E4D4R3U6BE3D1F4U6G 

1L3BG3F6R4U9F9U3F3R3E4D1F3R5E3U1 

4R4D17R3U17R6U3L16D14G2L1H2U14L3 

D4BG3H2L1G2D6F2R1E2U6BE3H4L3G4D1 

0H6E8L4G6U6L3D3H3BD4D3G1L3U5R3F1 

BU4L7D4H4L3G4U4L3D16H3G3U16L3" 

60 PMODE1 , 1 : PCLS : DRAWBM30 , 60S9 " 

+D$: PAINT (32 ,62) ,6,8 

70 PMODE1,3:PCLS:DRAW"BM2 5,70S10 

"+D$: PAINT (2 7, 72) ,6,8 

80 PMODE1,5:PCLS:DRAW"BM20,70S11 

"+D$: PAINT (2 2, 72) ,6,8 

90 PMODE1,7:PCLS:DRAW"BM15,70S12 

"+D$: PAINT (17, 72) ,6,8 

100 FORX=lT07 STEP2:PMODEl,X:SCR 

EEN1,1:PLAY"01V25T255ECECECECECE 

CECEC" :NEXTX: F0RX=1T04 : PLAY"T98D 

FEAGBC" : NEXT: F0RX=1T0999 : NEXT 

110 CLS: PRINT :PRINT"THE EXERCISE 

PROGRAM IS DESIGNEDTO GIVE ALL 
MUSCLES AN INTENSE WORKOUT AS W 



ELL AS IMPROVING THE HEART AN 

D LUNGS." 

120 PRINT: PRINT "YOU MUST EXERCIS 

E AT LEAST FOUR TIMES A WEEK TO 

GAIN THE FULL BENEFIT OF THIS 

PROGRAM." 

130 PRINT: PRINT"ENTER SPEED 

BEGINNER TO EXP 
ERT 1-5":SP=VAL(INKEY$) 
140 TIMER=0:PE$=" 111139325111139 
••:• RELATIVE SPEEDS FOR EACH EXER 
CISE l=SLOW 9=FAST 
150 SPEED=VAL(INKEY$) : IF TIMER>4 
00 THEN SPEED=4 : ' DEFAULT VALUE 
SET SPEED= TO 1 SLOW 5 FAST 
160 SP=SP*SP 

170 IF SP<1 OR SP>25THEN150 
180 CLS: PRINT: PRINT" STRETCH Y 
OUR MUSCLES WHILE FOLLOWING 
ALONG WITH THESE RECOMMEND 
ED EXERCISES:" 

190 PRINT: PRINT :FORY=lT05:READEX 
$ : PRINT EX$ : PLAY "ABCP4 ABC" : TIMER 

=0 

200 PRINT@187+32*Y,30-INT (TIMER/ 

60) :A$=INKEY$:IF A$=CHR$(10) THE 

N TIMER=1808 

210 IF TIMER>1809 THEN NEXT Y EL 

SE 200 

220 GOSUB960 

230 PRINT: PRINT" YOU SHOULD HAVE 

COUNTED 15 OR LESS FOR YOUR RE 
STING HEART RATE" 
2 40 PRINT :PRINT"WE ARE NOW READY 

TO BEGIN . " : FORX=lTO 3000 : NEXT 
250 CLS:FORX=lT015:P$=MID$(PE$,X 
,1) :PE=VAL(P$) 
260 IF X=ll THEN GOSUB1000 
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270 C=2-RND(2) :F=9-RND(2) 

280 PRINT@ 6 8, "REPETITIONS 1":PR 

INT@164, "EXERCISE "X 

290 READE$:PRINT@2 60,E$ 

300 READI$:IF X=12THENI$="ELBOWS 

IN AGAINST SIDES" ELSE IF X=13T 
HENI$=" RIGHT ARM DOWN" ELSE IF 

X=14THENI$="HEEL TO OUTSIDE OF 
HAND" 
3 10 PRINT@353 , 1$ : PRINT@426 , "REST 

320 IF C=0 THEN D=6 ELSE D=5:E=7 
-RND(2) : TIMERS 
330 F0RZ=1T05STEP2 
34J3 READD$:PMODEl,Z: COLOR 7,D:PC 
LS:DRAWD$: PAINT (255 ,191) ,E,7:REA 
D A, B: PAINT (A, B) ,F, 7 :READA, B:PAI 
NT(A,B) ,7, 7: IF X=4 OR X=13THENPA 
INT(145,55) ,E,7 
350 NEXT Z 

3 60 FORY=lT03:PMODEl,l:IF TIMER> 
420 AND TIMER<1200 THEN TIMER=42 
ELSE TIMER=0 

370 PRINT@80,Y:V=INT (TIMER/60) :V 
=9-V:PRINT@431,V 

380 IF TIMER>420 THEN SCREEN1,C 
ELSE370 

390 IF TIMER>590 THEN400ELSE390 
400 PLAY"O2L30;F" 

410 FOR Z=1T05 STEP4 : PMODE1 , Z : PL 
AY"C":SCREENl,C:FOR S=1TO1400 ST 
EP SPEED+PE:NEXTS:PMODEl,3:SCREE 
Nl,C:FOR S=1TO700 STEP SPEED+PE: 
NEXTS , Z 

420 IF TIMER<1200 THEN400 
430 NEXTY,X 

440 FOR X=1TO3000:NEXT:GOSUB960 
450 PRINT: PRINT "YOUR EXERCISE HE 
ART RATE SHOULD BE BETWEEN 32 AN 
D 45 DEPENDING ON YOUR AGE." 
460 PRINT: PRINT "IF YOU COUNTED M 
ORE YOU PROBABLYEXERCISED TOO HA 
RD FOR YOUR PRESENT HEALTH." 
470 PRINT: PRINT "STRETCH AND WALK 
AROUND FOR A FEW MINUTES. " : TI 
MER=0 

480 PRINT® 4 70, 150 -INT (TIMER/ 60 ) : 
A$=INKEY$:IFA$=CHR$(10) THEN530 
490 IF TIMERO000THEN4 80 
500 GOSUB 960 

510 PRINT: PRINT "YOU SHOULD HAVE 
A RECOVERY RATE OF 30 OR LESS." 
520 FORX=1TO4000 : NEXT 
530 PMODE1 , 7 : SCREEN1 , : F0RX=1T04 
:PLAY"O2T20V15FGFGFGFGDABEAFGFGF 
G" : NEXTX : FORX=1TO5000 : NEXT : CLS : P 
RINT@170,"YOU MADE IT!": PRINT 



540 PRINT@400," " : END 

550 DATA" SLOW JUMPING JACKS",' 1 

HURDLERS STRETCH"," TRUNK ROTATI 

ONS"," REACH FOR THE SKY"," LOOS 

EN NECK AND ANKLES" 

560 DATA"NIP-UPS", "DON'T ALLOW F 

EET TO HIT FLOOR" 

570 DATA"S8BM120, 139U5R16E1R2F1R 

15F2R1U4E2D11L1H2G2L55H1NU4L26U2 

R3H1R11E1R6H1U2NG3R2E1D1R1F2D1R1 

BH1E2R19F1" , 110 , 130 , 62 , 130 

580 DATA"S8BM120 , 139U6R4E7U1E1R1 

E8R4U4E2D10L1G21L12H12U2NE2L1H17 

E2F1R1D1F7R1F3E2NL4F2NL1R1D1F1D2 

BG1NH4E1R3F9R4" , 110 , 130 ,76,97 

590 DATA"S8BM120, 139U5E2U18E2R1U 

1H3U3F8G1D24G3L12H3U10E1NR5U26R2 

D3R1D10F1D3ND8F3NL3D2NL1F1L1D1G2 

F2D4F1" , 110 , 130 , 114 , 100 

600 DATA"SQUAT THRUST", "GO TO FU 

LLY EXTENDED POSITIONS" 

610 DATA"S8BM122 , 94R4D35G2F1R3F2 

L11U1E2H2U26H2U5E2U20E2A3XR$;A0F 

2D17F4R1D1F1G2H10U11R4D11F2" , 120 

,150,120,35 

620 DATA"S8BM120,120R3NF3E1U2NR8 

E3R4F2D2NH1G1NL1G1D1L1G1L2G1D4G1 

D3R4F2D4G4F2D1F1R3D1L5H9U13R4D13 

NE2F4BG2G1NL4F2L7H3E3H2L3H3U6E9" 

,110,150,140,110 

630 DATA"S8BM120,120F2XR$;G2L1BL 

4U4R4D11F6D1F1R3D1L5H9U7L14NU6G9 

L18H2G1D7G1L1U12R3E2R13E10R23" , 3 

0,150,135,122 

640 DATA" PUSH-UPS"," ELBOWS PERP 

ENDICULAR TO SIDES" 

650 DATA"S12BM200,68U4L4D4L14NU6 

G2L2G2L1G1L3G1L3G1L3G1L3G1L2H2D7 

G1L1U11R2E2R2E1R3E1R3E1R3E1R1E6R 

23F2XR$ ;G2L1D7G1D6R2D1L5U15" , 58 , 

85,230,50 

660 DATA"S12BM150 , 88NR12H1NU5G1L 

4G2L8G1L10H2D6G1L1U10R2E2R6E2R7E 

2R28F2ND4XR$;G2L3E1U3H1L2G1D12R5 

U1L2U9BH2ND1R1" , 58 , 85 , 230 , 68 

670 DATA"S12BM152,95NR12H1NU5L26 

H2D7G1L1U11R2E2R18E1R6F1R19F2XR$ 

; G2L3U2R1E1U2H2L2G1D11R5U1L2U7" , 

80,80,235,80 

680 DATA"SIDEWINDER","LEFT ARM D 

OWN LIFT LEG HIGH" 

690 DATA"S12BM111,70D7L2G16H2D1G 

1L2U4R1E1NE15H1D1G1H3E1R1H1E17R1 

3D3R3U3R10H1NE2H4G4F1BL5U1E8F10D 

3XF$;D2G2D1NL3D12F1G2H2L1U1R1U15 

L18", 140, 80, 210, 80 

700 DATA"S12BM111 , 70D7L2G16H2D1G 
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1L2U4R1E16L21U2G1L2U4R2F1U2R32BR 

5H1E4F4NE2F1L10D3L3U4E8F10D3XF$; 

D2G2D1NL3D12F1G2H2L1U1R1U15L18", 

140,80,210,80 

710 DATA"S12BM111,70D7L2G15H2D1G 

1L2U4R1E16H16E1L1H1E3F1D1E1F15R7 

BR5H1E4F4NE2F1L10D3L3U4E8F10D3XF 

$ ; D2G2D1NL3D12F1G2H2L1U1R1U15L18 

",140,80,210,80 

72)3 DATA"TREAD MILL", "BACK AND F 

ORTH BETWEEN HANDS" 

73)3 DATA"S12BM100, 100D5R10F1R2U4 

R4D9G1D9R3D1L6U16L2F1D10G2R3D2L8 

U2E1H1U6L9H3F2G6L16H2D7G1L1U11R2 

E2R11E8ND5E3R23F2XR$;G2L1", 120,1 

00,180,98 

740 DATA"S12BM100, 1)3)3D6R13BR4U4L 

4D2)3R6U1L3U9E1U5R1E2U4XR$;U4H2L2 

3G3D5F2L8G2H1L1D1)3R1E1U5F2R17E2U 

3H4", 12)3, 100, 18)3, 9 8 

75)3 DATA"S12BM97 , 100D6NR10G10L16 

H2D7G1L1U11R2E2R11E11R23F2XR$;G2 

L1BL4U4R4D1)3G1D8R3D1L6U16L3F2D8G 

2R3D2L6U2H2U5L7H2 " , 12)3 , 1)3)3 , 18)3 , 9 

8 

760 DATA"RUNNING IN PLACE", "KNEE 

S WAIST HIGH" 

770 DATA"S8BM128 , 162U5NE2U4NF2U1 

7NL5E1U9BU6F5E4U2R1D1E1F2G9H9E3F 

2U4H2L4A3XR$;A0L4G2D18H7E7D6G2F2 

D6G2D5F2D26F2G2D1R11H2L3H1E2U6E9 

U4H9", 120, 9)3, 12)3, 50 

780 DATA"S8BM121,86R5D35G2F1R3F2 

L11U1E2H2U26H2U5E2U20E2A3XR$;A0F 

2D17F4R1D1F1G2H10U11R4D11F2" , 12.0 

,110,120,30 

790 DATA"S8BM125, 158E8H3ND6H9U5E 

2NR5U2F2R1E2H1U1L2H4E7H3G9F7BU4U 

4BU6U4E2A3XR$;A0F2D10F4E9H2L2D2G 

4H5D15G1D7F9D4G9L1F3D3L1H6F5D1G2 

F1R3F2L11U1E2H2U26" , 120 , 110 , 122 , 

45 

800 DATA" DOUBLE -UPS", "FAST CONTI 

NUOUS CYCLE" 

810 DATA"S12BM120 , 120U5R15E1R2F1 

R16F2R1U4E2D11L1H2G2L55H2A2XR$ ; A 

0E2R13BR3D4G2L10U4R9U3E1R1F1D1R3 

Fl", 130, 110, 30, 115 

820 DATA"S12BM120 , 120U6R1U9E2R15 

F2R1U4E2D11L1H2G2L9D10G2L18H9U3N 

R2H2E5G3NF1G2H1U4E3R2F3L2D2U2R2D 

2F1L1D1G3E2R3F6BR4G7H6E3F4E4R3D1 

G1R3",130,110,60,70 

830 DATA"S12BM117 , 90G2U3L4D6F2R1 

E4F2D5U5H2E2U1H1L1G1U3H2L4A3XR$; 

A0U1E2R17F1E1U3E2D11L1H2G2L10F5D 

5G4L8H7U8E2 " , 130 , 110 , 100 , 50 

840 DATA"TRIANGLE PUSH-UPS" , "FOR 



EHEAD IN SPACE BETWEEN HANDS" 

850 DATA"S12BM110 , 84D5F1R13BR4U2 

L4D9F9R5U1L3H1U1H6U7E2U4XR$;U4H2 

L23G7L3G2L7G4L2D11R1E1U6R8E1R7E3 

R3E6",40,120,190,85 

860 DATA"S12BM110 , 102D5F1R14BR4U 

3L4D7F5R2F1R6U1L3H1L2H4U4E2U4XR$ 

;U4H2L28G2L6G2L6G3L2D11R1E1U7R1F 

1R12E2R10E2 " , 40 , 120 , 190 , 100 

870 DATA"S12BM110 , 120D4F2R8BR6E1 

H3G4D1F2R9E1F1R6H1L2H1L2H1L2NL4E 

1U4XR$;U4H3L18H1L5G1L20G1L2D11R1 

E1U6F2R25E1" , 40 , 120 , 190 , 120 

880 DATA"KANGAROO HOPS"," FAST 

AND HIGH" 

890 DATA"S8BM116,86R5D35G2F1R3F2 

L11U1E2H2U26H2U5E2U20E2A3XR$;A0F 

2D17F4R1D1F1G2H10U11R4D11F2" , 120 

,120,115,28 

900 DATA"S8BM119 , 80L3BL2G2D5F12G 

7D1G1F6U3H2R1E9U4H9U7E1U18H2L4A3 

XR$,"A0L4G2D3G6D2F8R1E2H1U1L2H4E6 

H3G1BD6D4BD4D2 " , 110 , 90, 112 ,22 

910 DATA"S8BM118,75L5NU2D4F4R3E6 

NU3D9G1F7U3H3U2R3U16H3L3G5U12H2L 

4A3XR$;A0L4G2D3E2F3G6R5E1D1R1D3L 

10H2U2E6" , 120 , 80 , 112 ,25 

920 DATA "CURL-UPS", "DON'T SIT-UP 

. ..CURL-UP" 
930 DATA"S12BM125,171U5NH1U1R6E9 
R5F12G2F1R5F2L11U1H9G10L28H2L2G1 
NH5G1L4H3U2E3ND2R2ND1E1D1R1F2D4R 
3U2R1H1U6D5R4U2NR16U5H3L1G3D7" , 1 
40,160,40,170 

940 DATA"S12BM125 , 171U6NL4R6E9R5 
F12G2F1R5F2L11U1H9G10L16H9U2H2L2 
NU7H3U4E2R3NG2F1NG1R1D1F1D3G3F2E 
1R1U1NE4F3E3NF5E2U4H1L4G4", 140,1 
60,55,120 

950 DATA"S12BM125,162E4NU3F1E9R5 
F12G2F1R5F2L11U1H8L1G9L8H5U8E3U3 
H1NE5H1U4E3R2F3NL2D2NL1F1L1D1G2L 
4D3R2D1E1NR5D4R6E3U1H3L5",140,16 
0,120,100 

960 PLAY"T20ABCP4ABC" : CLS : PRINT : 
PRINT "LAY DOWN AND PLACE YOUR FI 
NGERS ON YOUR NECK. ": PRINT "BEGIN 

COUNTING YOUR HEARTBEATS WHEN 
YOU HEAR THE SOUND." 
970 FORX=lTO 3 350 : NEXT: PLAY"04V2 
5L50ABA" : TIMER=0 

980 IF TIMER>=900THENPLAY"BCC"EL 
SE980 

990 RETURN 

1000 RESTORE: FOR N=1T07:READ E$: 
NEXTN:FOR N=1T03:READ E$:FOR M=l 
T04:READ A: NEXT M,N 
1010 RETURN ^ 
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PROGRAMMING UTILITY 



32K 
Disk 



RAINBOW 



Inspired by a "schematic scoundrel, " this program is an 
aid for drawing flow chart diagrams 



CoCoflow: 

CoCocad Expanded 



By Dennis Page 



The "mini-CAD" (Computer- 
Aided Design) program, called 
CoCocad, written by Peter 
Kerckhoff (THE rainbow, October 
1985, Page 130) proved to be very 
interesting. It aids in drawing schemat- 
ics. The program is icon menu-driven 
using a mouse, joystick, X-Pad or touch 
tablet. The keyboard is seldom used. 

1 am surrounded by expensive three- 
dimensional color CAD systems at 
work and because of that, was skeptical 
of the CoCocad utility. However, after 
typing in the program to learn how 
graphics pointing and positioning was 
handled, new uses for CoCocad came to 
mind. How about modifying CoCocad 
to draw flow charts? A typical computer 
buff could use the same system to draw 
schematics for computer circuits and 
draw corresponding software flow 
charts as well. 

To do this, minor modifications to 
CoCocad are needed. The modified 
program is called CoCoflow, and in- 
stead of drawing schematic representa- 
tions of electronic components, it draws 
flow chart symbols. 

On first look, the only difference 



Dennis Page is an electronics engineer, 
consultant and writer based in Los 
Angeles. 



between the two programs is that the 
CoCocad diode icon has been replaced 
by a familiar flow diagram symbol, the 
diamond-shaped decision block. Figure 
1 shows a sample CoCoflow screen. The 
differences become apparent when the 
flow diagram icon is selected. The pull- 
down menu shows the first flow chart 
symbol selection: a terminal symbol 
that begins or ends the flow chart. As 
the mouse button is pressed, more 
symbols show up. 

Figure 1: Sample CoCoflow Screen 
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To use a symbol, move the cursor to 
USE in the menu and press the mouse 
button. The pull-down menu disap- 
pears and the selected symbol may be 
moved to the desired location. These 
symbols include right, left, up and down 
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arrows to show flow directions. The 
arrows may be made longer with the line 
function, just as CoCocad does it. 

CoCocad modifications are easily 
accomplished with the following proce- 
dure. Copy CoCocad to create the new 
CoCoflow program by using the com- 
mand: 

COPY "COCOCAD. BFIS" TO "COCOFLOW 
.BAS" 

Then load CoCoflow by using the 
command: 

LOAD "COCOFLOW" 

Modify CoCoflow by typing in List- 
ing 1. The line numbers are arranged to 
replace the corresponding CoCocad 
lines, so be sure your copy of CoCocad 
is numbered identically to the listing in 
the CoCocad article. Otherwise, you 
will have to match up the correct lines 
for replacement. Line numbers shown 
alone are line deletions — CoCoflow 



does not need these lines. Be sure to get 
the line numbers correct, otherwise the 
wrong lines may be replaced. If you do 
make a mistake and cannot find the 
error, just reload CoCoflow and start 
over. When finished, save CoCoflow by 
using the command: 

SAVE "COCOFLOW" 

Description of Modifications 

Line 120 changes the dimension of 
variable arrays CM and CO to reflect 
the larger flow chart symbols for GET 
and PUT operations. Line 440 changes 
the name of the component pull-down 
menu to symbols and changes the 
graphics location of the flow chart 
symbol within the pull-down menu. 
Line 460 changes the number of selec- 
table symbols and the location of the 
symbol within the pull-down menu. 
Lines 470 and 870 also reflect the 
changes in the number of symbols. 
Lines 880 through 970 are the DRAW 



strings for the new symbols. Lines 980 
through 1 1 10 are deleted because there 
are fewer symbols. Line 1760 replaces 
the diode symbol in the icon menu to 
the diamond-shaped flow chart symbol. 

Now try it! You'll see that CoCoflow 
operates just like CoCocad, except that 
you can now draw flow charts. 

CoCocad is an excellent example of 
applying pointing devices, pull-down 
menus and icon menus to simplify 
program operation. Reading Peter's 
commented program listing reveals 
much. Rewards await the student who 
uses CoCocad as a learning tool. 

As Peter had also suggested in his 
article, if you use CoCoflow to draw a 
flow chart you hope to have published, 
please put a little note somewhere 
denoting that CoCoflow was used to 
draw the chart. Any questions regard- 
ing these modifications may be directed 
to me at 14108 Doty Avenue #36, Haw- 
thorne, CA 90250. Please include an 
SASE. □ 



Editor's Note: The following are modifications to the 
CoCocad program that appeared in "CoCocad: The 
Schematic Scoundrel" (THE RAINBOW, October 1985) 
by Peter Kerckhoff. Load CoCocad, type in the 
following lines and save as CoCoflow. CoCoflow 
operates just as CoCocad except flow chart symbols 
appear instead of schematic symbols. For your 
convenience, the above modifications will be incorpo- 
rated into the CoCocad program, and will be included 
on this month's RAINBOW ON TAPE. 



The listing: COCOFLOW 

120 DIM C$(3) ,A(8) ,AD(8) ,C1(1) ,C 
2(1) ,C3(1) ,L1(6) ,L2(6) ,L3(6) ,L4( 
6) ,CM(32) ,CO(32) ,MD(255) ,MO(255) 
:B$="V31L100O4B":NF$="NONE" 

440 T$=" SYMBOLS" :GOSUB8 50 :T$="N 
EXT USE":TX=55:TY=115:GOSUB100 
: T$="PREV" : TX=55 : TY=107 : GOSUB100 
: N=3 : GOSUB50 : N=l : DRAWBM56 , 65" : G 
OSUB870 



4 60 IF X>80 THEN GET (56 , 65) - (56+ 
XW,65+YW) , CM, G: PUT (50, 50) -(110,1 
20) ,MO,PSET:GOTO480 ELSE DRAW'BM 
56 , 65C5" : GOSUB870 : DRAW"BM56 , 65C0 
" :IP Y<109 THEN 470 ELSE N=N+1:I 
F N<11 THEN GOSUB870:GOTO45J3 ELS 
E N=1:GOSUB870:GOTO450 

470 N=N-1:IF N>0 THEN GOSUB870:G 
OTO450 ELSE N=10 : GOSUB870 : GOT045 



870 ON N GOTO 880,890,900,910,92 
0,930,940,950,9 60,970 

880 DRAW"BD7EUEUERERER34FRFRFDFD 
FD2 GDGDGLGLGL3 4 HLHLHUHUHU " : XW=4 8 
: YW=1 6 : RETURN : ' TERM 

890 DRAWBD16BRU2EU2EU2EU2EU2EUR 
42 D2GD2GD2GD2GD2GDL42":XW=48:YW 
=16: RETURN: 'I/O 

900 DRAW"R48D16L48U16":XW=48:YW= 
16: RETURN: 'PROCESS 

910 DRAWBD12RERERERERERERERERER 
ERERE FRFRFRFRFRFRFRFRFRFRFRFRL 
GLGLGLGLGLGLGLGLGLGLGLG HLHLHLHL 
HLHLHLHLHLHLHLH" : XW=48 : YW=25 : RET 
URN: 'DECISION 
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920 DRAWR48D16L8GL5GL3GL3GL3GL4 


1030 


(delete) 


GL6HL4HL2HUHU16" : XW=48 : YW=22 : RET 






URN: 'DOCUMENT 


1040 


(delete) 


930 DRAW"BD3EURER2FRDFD2GDLGL2HL 


1050 


(delete) 


UHU" : XW=9 : YW=9 : RETURN : ' CONN 








1060 


(delete) 


940 DRAW"BD8BR4NU7NH3E3" :XW=8:YW 






=8 : RETURN : ' D-ARROW 


1070 


(delete) 


950 DRAW"BD4BRE3ND7F3":XW=9:YW=8 


1080 


(delete) 


: RETURN: 'U-ARROW 








1090 


(delete) 


960 DRAW"BD4R7NH3G3":XW=8:YW=8:R 






ETURN: 'R-ARROW 


1100 


(delete) 


970 DRAW"BD4BRNR7NE3F3":XW=9:YW= 
8 : RETURN : ' L- ARROW 


1110 


(delete) 


980 (delete) 


1760 


DRAW"BM4 / 4R6D12R6 BM24,4R12 


D12L12U12 BM43,10E6F6G6H6 BM62,4 


990 (delete) 


R2BR3R2BR3R2D2BD3D2BD3D2L2BL3L2B 


L3L2U2BU3U2BU3U2 BM81, 4R12L6D12 


1000 (delete) 


BM102 


, 4D4NR6GFNR6GFNR6GFND4R6ND4 


EHEHEHU4L6 BM119 , 8ND4R6U4F6G6U4L 


1010 (delete) 


6": RETURN 


1020 (delete) 




/»» 



PAYROL/BAS 



TM 



VERSION 1.4 



•Minimum system requirement are one disk drive. 64K CoCo with disk basic. 

A dynamic tool lor businesses and accountants, PAYROL/BAS™ cuts checks and 
keeps records for companies up to 100 employees. All you need is a computer 
with 64K Extended Basic, one disk drive and a printer, and PAYROL/BAS™ lets 
you: 

• Enter employee data (name, address, SS/r, FICA. taxes, deductions, prolil 
sharing, insurance), 

• Cut checks. (The program works with both pin-leed and Iriction-feed printers, 
and we can even supply the checks if you need them.) 

• Automatically calculates and stores seven deductions, including federal. FICA, 
state, three of your choosing (such as city, prolil sharing or insurance) and one 
miscellaneous. 

• Will calculate tax and print to screen tor approval before printing check. 

• Keep ledgers (including monthly listings of all checks, gross income. FICA, 
taxes, profit sharing, insurance). 

• Error correcting routine lets you change data il you have made a mistake. 

• Handles weekly, bi-weeklv, semi-monthly and monthly pay periods. 
Calculates state tax automatically. 

• 'Each state has custom code included. 

We have New York City witholding. $29.95/extra. 

Only $79.95 "($2 shpg) 
OTHER PROGRAMS FROM HOWARD 

SAP II STOCK ANALYSIS PROGRAM: Stores and tracks your stock portfolios 

performance A Howard oxclustvo. S19.95 t$2 shpg) 
EPSON PRINTER TUTORIAL: Menu driven program that teaches you how to use 

the different commands to unleash the lull potential ol your Epson printer. S29.95 

(S2 shpg) 

• BLOOD PRESSURE ANALYSIS: Studies show that daily tracking of 
blood pressure will actually lower it. $24.95 ($2 shpg) 
HOSPITAL GRADE BLOOD PRESSURE KIT: Includes adult cull, 
aneroid, bladder, tubing and bulb, plus carrying case. 108-M $25 ($2 
shpg) Both for $39.45 ($2 shpg) 

REVERSE VIDEO: Basic listing, lets you include reverse video 
in your program. $14.95 ($2 shpg) 



Includes 1986 changes in FICA & Federal Witholding. 
By Bernie Litton 

| VIP WRITER: Powerful word processing program has 

I standard word-processing features PLUS 

I automatic justification, pagination, centering options. 

as well as Error Detection and Undo Mistake features. 

I A "llawless" program, according to Rainbcw. S68.88 

(includes VIP Speller) (S2 shpg) 

VIP CALC: Creale business spread sheets, gel up to 33K of work space in 64K 

Calculation functions include trigonometry and sorting. S68.88 (S2 shpg) 
VIP DATABASE: Stores data and files of all kinds and allows you to combine VIP 
Writer files as well. Do mailing lists, inventories, menus and recipes, and more! 
S58.88 (S2 shpg) 
VIP LIBRARY: Includes all of the above plus terminal & Disk-ZAP in 
one intergrated package $125 ($2 pkpg) 




WITH PAYROL/BAS™ YOU'LL ALSO WANT. . . 

•941 Program: Gives individual summaries and totals ol check information to 

prepare 941 and slate unemployment forms. S29.95 (S2 shpg) 
' W-2 Program: To cut year-end W-2-s. S29.95 ($2 shpg) 



American Express, MasterCard, VISA accepted. 

SEND TO: Howard Medical Computers 

Box 2, Chicago IL 60690 312/278-1440 

Name 

Add ress 

City, State, Zip 



Please send (desc. & qty.— III. res. add 8% sales tax): 



include card # 
exp. date 



DEALER INQUIRIES INVITED RB12 84a 
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New Dual Mode EPSON 

The new Epson LX-80 otters printing flexibility in 
two modes: one mode allows you to print in a quick 
(100 cps) dot-matrix style for programming and 
graphics, and the Near Letter Quality mode (16 
cps) produces precise (240 dots per inch), 
beautiful type lor correspondence, reports, and 
similar purposes. The LX-80 offers 160 different 
type-style combinations, including Pica, Elite, 
Enlarged, Emphasized, Condensed, Subscripts 
and Superscripts, and type-styles can be selected 
quickly from the top control panel or from program 
control. Comes standard in friction feed; tractor op- 
tion is also available. 

LX-P package includes an LX-80, a serial inter- 
face, a Color Computer to Epson cable, and 
Printer Tutorial that teaches you how to pro- 
gram the different type styles ($29.95 value). 

LX-P: LX-80 package $317 ($7 shpg) 
ET-1 tractor option for LX-80. S29.50. 
SF-1 Single-sheet feeder for the LX-80. S145 ($7 

shpg) 



Epson 


RX-80 FT repack 


$207. 


Epson 


LX-80 New 


$249. 


Botek 


Serial to parallel converter 


$68.45 


Howard 


CoCo to Epson cable 


$25 



MONITORS 



123 Zenith 12" Green Screen, 640 dots x 200 dots 
resolution, 15 MHz band width. $114 ($7 shpg) 



123A Zenith 12" Green Screen Special, $67.50 

($7 shpg) 80 Column non glare 



122 Zenith 12" Amber Screen, 640 dots x 200 dots 
resolution, 15 MHz band width. $117 (7 shpg) 



131 Zenith 13" Color Monitor with speaker, 
composite & RGB jack, 240 dots x 200 dots 
resolution, 2.5 MHz band width. $168 
($14 shpg) •CLOSEOUT40 Column 



141 Roland 13" Color Monitor with 3pooker, 
270 dots x 200 dots resolution, 4MHz band width 
$247 ($12 shpg) 

All monitors require video controller. 

Reverse video free with monitor order. 

MEMORY 

64K Upgrades— 1 Year Warranty 
64-E1 for E Boards with complete instructions. Re- 
move old chips and replace with preassembled 
package— no soldering or trace cuts. $28.45 (S2 
shpg) 
64-F1 for F Boards. No soldering needed. Capacitor 

leads must be cul. $24.45 (S2 shpg) 
64-2 for COCO 2. Kit requires one solder point, no 
trace cuts $24.45 (S2 shpg) 



Ma 



lX-»° 



CONTROLLERS 



New Controller from J&M: Has switch that allows 
either JDOS or RS DOS to be the disk operating 
system; eliminates software compatibility problems, 
while preserving the advantages of J&M's gold con- 
tacts and data separator. Also added to the DC-2 is 
a parallel port, which means a serial interface is no 
longer needed to make a parallel printer (like the 
Epson) work. 

DC-2 Disk Controller with JDOS. $ 1 28 ($2 shpg) 
RS-1: RS DOS ROM Chip. $20.00 ($2 shpg) 
DC-1 Disk Controller reads and writes to 35 and 40 
track single and double-sided drives for all models 
of the Color Computer w/ JDOS. $128 ($2 shpg) 
VC-1 Video Interface mounts inside Color Computer 
by piggy-backing IC on top of interface — no solder- 
ing, no trace cuts. All models give composite video 
& sound. $24.45 ($2 shpg) 
VC-2 for COCO 2— mono only. $26.45 ($2 shpg) 
VC-3 for COCO 2 — both color or monochrome 

$39.45 ($2 shpg) 
VC-4 for new Color Computer (no sockets, chips are 
soldered to mother board). Attaches with spring- 
loaded clips. Color or mono. S39.45 ($2 shpg) 




Epson Homewrlter HM1 has serial pick 
interface and cable included. 100 CPS, 
bidirectional dot matrix impact for regular 
paper and one copy. 

$258 ($7 shipping) 




EPSON AND J&M 

The EJ-P Package 
The Epson LX-80 Printer teamed with our new 
J&M DC-2 Controller gives you top printing 
capabilities plus built-in switch gives JDOS or 
Radio Shack DOS so all software can run on your 
Color Computer. Package includes: Epson LX-80 
Printer with ET-1 tractor; DC-2 controller; 
parallel Color Computers to J&M cable; 
Epson Printer Tutorial ($29.95 value). 

Complete EJ-P package $425.00 (S7 shpg) 



HOWARD QUALITY STANDS 

New TS-1X Mon- 
itor Stand: De- 
signer-beautiful 
stand with clear 
corner posts, 
easy side access 
to ROM port, re- 
set and on'off 
buttons. $39.50 
(S3 shpg) 
TS-1: Standard 13" monitor stand for the original Color 

Computer. Specify black, ivory or clear. 15"x11"x4". 

S29.50 ($3 shpg) 
TS-2: Same as above for the COCO 2. S29.50 ($3 

shpg) 
PS-1X Printer Stand features new noise-suppressing 

foam top and cork base. 15"x11"x2V4". $24.95 ($3 

shpg) 



GUARANTEE 

Howard Medical's 30-day guarantee is meant to 
eliminate the uncertainty of dealing with a com- 
pany through the mail. Once you receive our hard- 
ware, try it out; test it for compatability. II you're 
not happy with it (or any reason, return it in 30 days 
and we'll give you your money back— no questions 
asked. Hours: 8:00-4:00 Mon.-Fri. 

10:00-3:00 Sat. 

1 






Howard Medical Computers 



1690 Elston, Chicago 60622 



Cat. No Quantity 



Description 



Telephone (312) 278-1440 for questions 
Computer Bulletin Board (312) 278-9513 

Unit cost Cost 



!.', • Hoi - ■ 
money order 
is enclosed 



Name. 



B'li (circle onni 
Cred-i Caid » _ 
in dale . 



MC 



VISA 



Address, 



Cily. Slate Zip. 



Total Cost 
Shipping 
III. res. add 8% 
COD (add 1 90) 
Total order 




The Biggest 
The Best 



t»i jjob ami \ l ' 

The Indispensable 



The 




MDNTHlV MAGAZINE 



It's called the premier Color Computer magazine for good 
reason. THE RAINBOW is the biggest, best, brightest and most 
comprehensive publication a happy CoCo ever had! Is there any 
wonder we get letters daily praising THE RAINBOW, the 
magazine one reader calls "A Pot Of Gold" for his Color 
Computer. 

THE RAINBOW features more programs, more information 
and more in-depth treatment of the Tandy Color Computer than 
any other source. 

A monthly issue contains up to 300 pages and as many as two 
dozen programs, 15 regular columns and more than 20 product 
reviews. And advertisements: THE RAINBOW is known as the 
medium for advertisers — which means every month it has a 
wealth of information unavailable anywhere else about new 
products! Hundreds of programs are advertised in its pages 
each month. 

But what makes THE RAINBOW is its people. People like Fred 
Scerbo, who write special programs at the request of readers. 
Experts like Dick White and Joseph Kolar, two of the most 
knowledgeable writers on BASIC. Communicators like R. Wayne 
Day, who stay abreast of telecommunications advances. Or, 
Dan Downard, RAINBOW technical editor, who answers our 
readers' toughest questions. Educators like Dr. Michael Plog 
and Steve Blyn, who show how CoCo can be used at home or 
school. Advanced programmers like Dale Puckett, who guide 
you through the sophisticated OS-9 operating system. Electron- 
ics experts like Tony DiStefano, who explain the "insides" of the 
CoCo. These people, and many others, visit you monthly 
through columns available only in THE RAINBOW. 

Every single issue of THE RAINBOW covers the wide 
spectrum of interests in the Tandy Color Computer — from 
beginners' tutorials and arcade games to telecommunications 
and business and finance programs. Helpful utilities and do-it- 
yourself hardware projects make it easy and fun to expand your 
CoCo's capabilities. And, monthly reviews by independent 
reader reviewers take the guesswork out of buying new software 
and hardware products. 

Join the tens of thousands who have found THE RAINBOW 
to be an absolute necessity for their CoCo. With all this going 
for it, is it surprising that more than 90 percent of THE RAINBOW 
subscribers renew their subscriptions? 

We're willing to bet that, a year from now, you'll be doing the 
same. For more information call (502) 228-4492. 
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What goes well with 
the Rainbow? 
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Rainbow On Tape! 



We call it the other side of THE RAINBOW and we may 
have to raise the price just to call your attention to it. With 
as many as two dozen programs every month, RAINBOW 
ON TAPE is a luxury service at a bargain basement price. 

What is it? RAINBOW ON TAPE is a monthly cassette 
tape adjunct to THE RAINBOW and it's brimming with all 
the programs (those over 20 lines long) that fill the pages 
of the magazine. All you do is pop the cassette in your tape 
recorder and they're ready to run. No more lost weekends 
— or week nights — typing, typing, typing. With RAINBOW 
ON TAPE, you can read the article in the magazine then, 
in seconds, you load it up and run it. Yes, you could type 
them in yourself, as many people do. But all of them? Every 
month? There simply isn't enough time. 

Isn't it time your CoCo became a full-time computer 
instead of a typewriter? Think how your software library 
will grow. With your first year's subscription, you'll get 
almost 250 new programs: games, utilities, business 
programs, home applications — the full spectrum of THE 
RAINBOW'S offerings without the specter of keying in 
page after page and then debugging. 

RAINBOW ON TAPE — the "meat'' of THE RAINBOW at 
a price that's "small potatoes." Food for thought. To get 
your first heaping helping, just fill out and return the 
attached reply card. No postage necessary. 

Discover the other side of THE RAINBOW. It's not only 
a time-saver, it's the key to a whole new outlook! 





64K ext. basic 134 95 

Color Computer II 

Monitor Interface for above CoCo II 29.95 plus 7.50 installation, (color & green compatible) 




s^99 

Both our drive and 1 in one ca 
controller The best just goi 



Drive 1 Upgrade 99 
Add a second Us heighl drive to your Radio Shack 
26-3129. Comes with 3 minute installation instruc- 
tions, screwdriver required. 




SUPER DRIVE SALE 



Special prices on new first quality di -7 even have GOLD connectors on the back... Some other 

places charge 229.00 for dr. 1 and2 l " j |, Second Color Computer drive, or 

external mod III, IV. Drive 1juslplu(|;.intcitheextra 1 ible. Both drives are compatible 

with any version of theColorComputerand all versionsof drives. Drlv 1 Color Computer drive and 

comes complete w and R.S, controller. Fordout i,add45.00(onlyforthosewhohave 

DS-DOS, boards and knowledge) Bare lull h| 

THE COMPUTER CENTER 

901-761-4565, 5512 Poplar, Memphis. TN 38119 

Add S4.90 for shipping and handling— Visa, MC & money orders accepted 

Allow an additional 2 weeks for personal checks— Drive faceplates may vary slightly 



Determine the amount of early payoff 
on installment loans 



The Rule of 78s 



By Clarence Whaley 



After having read so many good 
articles in RAINBOW, I felt ob- 
liged to make a small contribu- 
tion. I am blind and have been a CoCo 
user for about two years. Among my 
responsibilities as a credit manager of a 
retail music store, 1 obtain credit reports 
from a mainframe computer, type con- 
tracts, make collections, etc. The CoCo 
is a fantastic aid when combined with 
the Votrax "Type & Talk." 

Clarence Whaley services and runs the 
Credit Department for L.C. Tiller, Inc. 
(Music Company) in Nashville, Tennes- 
see. His Ham call sign is KD4PT. 



The "Rule of 78s" formula is used to 
determine the amount of early pay-off 
on installment loans and eliminates the 
use of charts. The Rule of 78s program 
is written in two forms: a one-line 
version and a multiline version. This 
program is quite simple to use. Type 
CLOFID "RULE 76" and RUN. The pro- 
gram prompts are straightforward and 
should be easily answered by anyone 
not familiar with retail business lan- 
guage. The "Rule of 78s" formula can 
be obtained from: Department of Con- 
sumer Affairs, Federal Reserve Bank of 
Philadelphia, P.O. Box 66, Philadel- 
phia, PA 19105. 



With the use of a simple screen dump 
program, I have instant access to ac- 
counts receivable, etc. But this is a slow 
process. I would like to hear from other 
blind CoCo users to compare notes with 
them on more rapid access and business 
uses of the CoCo. Also, the cost of 
Braille printers is quite prohibitive 
($15,000) and out of the question! If 
anyone has come up with an affordable 
Braille printer, 1 would certainly be 
interested. 

(Mr. Whaley may be reached at 123 
8th Avenue North, Nashville, TN 37203, 
business phone 615-254-6533. Please 
enclose an SASE when writing. □ 
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290 


88 






END 


13 




The listing: RULE0F78 








lp0 TEXT$="" :GOSUB' 


l 

140 






110 TEXT$="":GOSUB440 




120 TEXT$="THIS PROGRAM FIGURES" 


:GOSUB440 




130 TEXT$="THE EARLY PAY-OFF 


OF" 


:GOSUB450 




14)3 TEXT$=" INSTALLMENT LOANS 


USI 


NG":GOSUB450 




150 TEXT$="THE RULE OF 78 "S" 


:GOS 
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UB450 

16,0 TEXT$="":GOSUB45,0 

17)3 TEXT$="SOME COMPANIES MAY HA 

VE AN":GOSUB45j3 

18j3 TEXT$="ADDITIONAL CHARGE FOR 

":GOSUB45j3 
190 TEXT$="EARLY PAY-OFF WHICH": 
GOSUB450 

2$$ TEXT$="IS NOT PART OF THIS F 
ORMULA" : GOSUB450 
210 TEXT$="":GOSUB450 
220 TEXT$="PRESS ANY KEY TO BEGI 
N":GOSUB450 
230 A$=INKEY$ 
240 IFA$=""THEN230ELSE250 
250 CLS:INPUT"TOTAL MONTHS OF CO 
NTRACT";N 

2 60 SOUND200,1 
270 A=(N/2*(N+1) ) 

280 INPUT"HOW MANY MONTHS REMAIN 

";B 

290 SOUND200,1 

300 C=(B/2*(B+1)) 

310 D=C/A 

320 INPUT "TOTAL INTEREST CHARGE" 

;E 

3 30 SOUND200,1 
340 F=(E*D) 
350 PRINT 

3 60 INPUT "CURRENT BALANCE DUE";G 

370 SOUND200,1 

380 H=G-F 

390 PRINT"THE REBATE IS":PRINT@1 

81,USING"####.##";F 

400 SOUND200,1 

410 PRINT"THE PAY-OFF IS":PRINT§ 

213,USING"####.##»;H 

420 SOUND200,1 

430 END 

440 CLS 

450 M=LEN(TEXT$) 

460 FOR X=l TO M 

470 PRINT§32*L+15-M/2+X,MID$(TEX 

T$,X,1) 

480 NEXT X 

490 L=L+1 

500 SOUND200,1 

510 RETURN 

520 'CLARENCE WHALEY 

530 '123 8TH AVENUE NORTH 

540 'NASHVILLE, TN 37203 

550 'PHONE: 615-254-6533 
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INTRODUCING OUR NEW 

PCX-II COMPUTER 

TOTAL IBM PC-XT COMPATIBILITY 
AT SENSATIONAL PRICES!!! 

Don't settle for a 
Tandy 1000 or 
other standard PC 
until you check our 
performance and 
prices. 




Mark Data Products uses and 

recommends the following excellent 

software: 

DAC - complete accounting system for IBM compatibles. General 
ledger, receivables, payables, inventory. 

An unbelievable bargain at ONLY $69.95 

DBASE III - Ashton Tate's powerful database management system 

ONLY $369.00 
THE TWIN - Works exactly like Lotus 1-2-3 

An outstanding value ONLY $145.00 

COCO UTIL • A valuable utility program that allows you to 
transfer Tandy CoCo disc files to your MS-DOS machine. You may 
also transfer MS-DOS files to a Color Computer disc. Will save you 
countless hours of retyping. $29.95 

SAVE MONEY 

We maintain a library of quality public domain software for 
purchasers of our computer systems— text processor, data base 
manager, spread sheet, communication, utilities and 
entertainment software. Call for details. 
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SPEED RACE 



by Steven Hirsch 



■The checkered flag drops as your pulse rises in this 
-lively new arcade game. The road twists to the horizon 

on the 3-D panorama that sets the stage for the most 
"exciting race the CoCo has ever seen! Vie for time as 
.you speed through the curves at incredible speeds. 

Step through the gears to stay ahead of the pack, but 
.step lively since some will stop at nothing to see the end 

of the race, or the end of you! Four challenging raceways, 

complete with obstacles and colorful 3-D scenery, put 
"your skills to the test in this Pole Position"" type game. 




'32K Color Computer Required. 



$34.95 



mmm 



By Kary McFadden 




You clutch the tank controls, searching for any sign of the 
enemy. Suddenly a blip appears on radar! Frantically, you 
move your tank into position. At last you spot the elusive 
enemy tank! Facing it, you race to lock sights and fire before 
he does! 

Enter the ultimate battle-zone in this exciting 3-D tank 
combat game. Strategy, speed, and your tank's cannon are 
your only hope as you wind through a three-dimensiona 
course inhabited by impenetrable barriers and enemy tanks. 

Dazzling graphics and lifelike sound take you a step beyond 
the ordinary in this fast, machine-language arcade game. 
Enter the next dimension, ROMMEL's troops are waiting for 
you! 




32K Color Computer Required. 



$29.95 





TAKING BASIC TRAINING 



A Simple Technique 
for Creating Animation 



By Joseph Kolar 
Rainbow Contributing Editor 



Animation gives any CoCo 
graphics program a lot of pizazz 
with the illusion of movement. 
The technique of creating animation 
seems beyond the capability of the 
newcomer to CoColand. It is not the 
formidable project that it appears to be. 
The good news is that the beginner 
need not be overwhelmed by animation 
creation. He can do it with a minimum 
of artistic talent. Today, we are going to 
make like we are Rembrandts, and do 
some simple but satisfying animation. 
Using artistic license, we will create a 
"stick bird." We will take this bird, set 
it in flight and give it a chance to soar 
on our screen. We will create various 
stick shapes to add variety and give the 
appearance of graceful flight. 

Look at Listing I and key in lines 10 
and 1000. PCLS3 gives us the back- 
ground blue sky upon which the bird is 
highlighted. Key in lines 20 to 27, the 
eight forms of the bird we will use in our 
effort to animate. They are called by the 
variables assigned them. The reason we 
use various forms of the bird is to create 
the illusion of a change in the bird as 
it wheels, soars or just flaps its wings. 

Florida-based Joseph Kolar is a veter- 
an writer and programmer and special- 
izes in introducing beginners to the 
powers of Co Co. 



If we usejust one shape throughout (one 
variable), the bird looks stiff and its 
flight stilted. 

Key in Line 30. All the birds are 
displayed using the DRAW statement. 
The color, horizontal and vertical loca- 
tions are included within quote marks. 
The desired bird shape is selected by 
picking the desired variable and added 
with the good old concatenation 
marker, '+'. Now RUN and you should be 
suitably unimpressed to see what is 
supposed to be a bird. Press BREAK and, 
one at a time, substitute the other 
variables in Line 30 to see the so-called 
birds in our repertoire. After you have 
seen them all, replace the original 
variable, B$. 

Keep in mind that there are many 
ways to develop animation. The follow- 
ing system is somewhat unwieldy, but 
lends itself admirably for the purpose of 
this tutorial. 

Run the program and note that we 
place a bird, in color C2, at both a 
horizontal and vertical location of 10. 
The bird (B$ in this case), has the left 
wing "up" and the right wing in a 
horizontal plane. At this time, also note 
that in lines 40 through 350, the color 
(C2) is redundantly included in every 
DRAW statement. In Listing 1 only the 
first C2 in Line 30 is required to main- 
tain the same color of the bird. CoCo 



knows that C2 is desired in all the 
subsequent DRAW lines. At a later stage 
in our artistic endeavors, it will be 
necessary to insert C2 in all of the DRAW 
lines in this listing. To save a lot of time 
and monotonous editing later on, we 
will put them in as we proceed. 

At this stage, we will place the 
various-shaped birds at locations we 
deem either logical or interesting, one at 
a time, ever increasing the number of 
birds in the flight plan. Press BREAK, 
key in Line 40 and RUN. You will see a 
second bird form on the screen (AS), 
with both wings in the "up" position. We 
moved it over to the right five units, to 
15 on the horizontal, and 10 units down 
on the vertical. We now have two birds 
on the screen. 

For the purpose of this tutorial, we 
will move either zero, five or 10 units 
from a previous location. This creates 
a smooth transition from one location 
to the next. 

Press BREAK, key in Line 50 and run. 
The same 'V bird is flying to the right. 
Comparing lines 40 and 50 in the listing, 
you can verify that we moved the bird 
10 units to the right. Press BREAK, key 
in Line 60 and run. You can see the same 
bird heading to the right. 

Don't get excited if the birds overlap 
on the screen. It will all be sorted out 
later. At this stage, we are plotting the 
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flight path and want to see every shape 
and its location as we create it. This way 
you can locate a desired shape at the 
location you feel is right. If you don't 
like the shape or location, it can be 
altered now without disturbing future 
additions to the flight plan. You won't 
have to dissect your program and wear- 
ily rearrange it later. 

We are so creative that we plot our 
animation program directly on the 
screen. However, you may use graph 
paper if you wish to determine the 
shapes and locations of the birds. 

Press BREAK, key in Line 70 and run. 
Here 1 promptly violated my own rule 
and dropped the bird, BS, 15 units. I had 
a down draft in mind, which 1 imagined 
might cause the bird to drop more than 
usual and change directions by going 
five units to the right. 

Press BREAK, key in Line 80 and run. 
Here the bird, E$, is wheeling to the 
right and down; press BREAK again. 

If you have difficulty viewing a shape 
that is superimposed over a previous 
shape, temporarily mask the previous 
line with a REM marker. RUN to see if it 
is what you intended, then remove the 
REM marker from the previous line. At 
this point, key in each program line one 
at a time, and check to see what shape 
you added where. 

We have completed our first phase: 
creating, locating and displaying each 
bird. Now that we have created each 
bird in our tableau, we have to make 
them vanish. Beginning with the bird at 
Line 30 through the last one at Line 350, 
we will erase them. LIST 30 and add +5 
to Line 30 to create the "erase" line. 
Thus, all program lines used to erase the 
birds will end in '5'. Key in 35, the line 
number, and copy the data appearing in 
Line 30 that you have on the screen 
changing only the digit (2) in C2 to '3'. 
Now run. C3 is the same color as PSCL3. 
The bird is still, invisible and effectively 
erased. 

If you care to check this out, tempor- 
arily change PCLS3 to PCLS2 in Line 10 
and RUN. See? Restore Line 10 to its 
original state. 

Press BREAK and LIST40. Create 
Line 45 and copy the scoop in Line 40, 
making the desired color change. Pro- 
ceed line by line, every once in a while 
pausing to RUN and make sure you have 
erased all the birds. If some residue 
remains on the screen, you made a boo- 
boo in copying! When you check, you 
will be excited to see the vestiges of a 
bird in flight, if ever so fleetingly. 



When you have finished the second 
phase and check out your work, you 
should get a fleeting glimpse of the bird 
in motion and end up with a blank, blue 
display. 

Obviously, we must create pauses 
between the creation and disappearance 
of each bird so ordinary mortals can 
observe the flight. The third phase 
determines the length of time each bird 
is visible. We will use a pause routine to 
accomplish this feat: FDR Z= 1 TO X: 
NEXT, where 'X' is some value between 
75 and 200. We will use increments of 
25, so for 'X' we will use the following 
values: 75, 100, 125, 150, 175 and 200 
to keep it simple and under control. 

After you get the idea, you can sub- 
stitute your values for the chosen ones 
in the listing to make it fly the way you 
want it to fly. First, let me give you the 
system we will use in this tutorial. 

Type in LIST 30-40. We list two lines 
to see how far the bird moved. We note 
that the bird moved 10 units down and 
five units to the right. We compare 
either Line 30 or 35 to Line 40. We will 
place the pause line immediately follow- 
ing the creation line (Line 30). Each 
pause line will be numbered by incre- 
menting the creation line by +1 and the 
erase line by +5. We will try 100 as the 
length of the pause. Key in 31 FOR 
Z=1TO100 : NEXT and run. You can't see 
much! Press BREAK, LIST40-50 and 
let's make this pause line shorter in 
duration by using 75. Key in 41 FOR 
Z=1T075:NEXT and run, then press 
break and LIST50-S0. We'll use 100. 
Key in 51 FOR Z=1TO100:NEXT. 

Follow the same procedure using 150 
in Line 6 1 , 1 00 in Line 7 1 and 75 at both 
lines 81 and 91. RUN and observe the 
movement. Press break and adjust it to 
suit yourself. It is your bird! Make it fly 
as you would imagine it should fly. Vary 
the time lapse, preferably a higher figure 
for a large location displacement and a 
shorter lapse for a small movement, but 
do it from one line to the next in a 
methodical manner, ensuring that all 
previously determined time pause lines 
are satisfactory. You may compare the 
pauses you chose with the ones in 
Listing 2. 

You may want the movement to be 
quicker so it looks even more natural. 
If so, lower the value of each pause line 
by 25 or 50 units. For that matter, you 
may prefer to substitute other shapes 
(bird variables). Be my guest! When this 
phase of the program is completed and 
all the pauses are set, you may want to 



change Line 1000 (1000 GOTO10). 

Since many of your pause lines are 
repetitious, this is an ideal occasion to 
use G0SUB. For instance, add 400 FOR 
Z=1T075:NEXT:RETURN and change 
lines 41, 81, 91, 141,221,231,241.251, 
261, 281, 291, 301, 311, 321 and 341 to 
GOSUB400. You will have to put in a line, 
3G0 GOTO10 or 3G0 GOTO1000, to walk 
around the G0SUB routine. Ideally, the 
GOSUB should be at the end of the 
program, for example, Line 2000. How- 
ever, using 400 instead of 2000 saves 
typing one extra zero and whatever 
error that third zero might generate due 
to typing mistakes. Naturally, you can 
make other GOSUB lines to accommo- 
date frequently-used pause lines. 

OK, what have we wrought? Nothing 
much! Just a bunch of lines flapping 
across the screen. But, you learned a lot 
quite painlessly. Let us recap: 

1) A picture, design or shape must be 
created. It can be elaborate or as mind- 
lessly simple as our bird. After it is 
created and put into a variable form, it 
can be called using DRAW. Alternate 
shapes should be created in anticipation 
of need, but they can be created as 
required and added to the list of shapes. 

2) It must be located at the desired site 
on the screen in a color other than the 
background. 

3) It must remain on the screen for a 
certain length of time. 

4) It must be erased by creating the 
same design and in the exact location 
but using the background color so it 
appears to vanish. 

5) The same picture or a variant, 
again created and called as a variable in 
a DRAW statement, can be placed in a 
newly selected location. Repeat steps 
two through four. Suppose you made a 
pastoral scene in the blank space re- 
served under the bird? Or the outline of 
a few buildings? 

Now that you know how to make a 
bird fly around, you can use the same 
technique to produce your own crea- 
tion. 

As an added attraction, Listing 3 uses 
SOUND as a timer and has a skyline 
thrown in to show how to enhance the 
animation. You can modify your tuto- 
rial program by inserting lines 11-13, 
modify Line 1000 and change all pause 
lines to SOUND lines. If you don't care 
for my sounds, make up your own. 

Finally, based on this tutorial, a 
mindless graphic is designed wherein 
bats, ad nauseam, put windows in the 
buildings. □ 
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Mind-tingling action 

THE SECOND RAINBOW BOOK OF 
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Twenty-four of the most challenging Adventure games ever 
compiled await you in this latest offering from The Rainbow 
Bookshelf. Journey through time, fight World War III, win 
the heart of a beautiful and mysterious princess. Experience 
the titillations of the most rugged Adventurer without ever 
leaving your seat. 

Order The Second Rainbow Book of Adventures and among the 24 program 
listings you'll receive are: 




Yellow Submarine — Meet the Beatles and attempt to 

outlast the Blue Meanies while enjoying some of the 

Fab Four's all-time musical hits. 

Ring Quest — Regain possession of a magical ring and 

save a kindom. 

Time Tripper — Lost in another dimension. 



Chief Inspector — Who killed B.L. Brown? 

Sir Randolf Returns — The sequel to a favorite from our 

first Adventure book. 

Silverton House — Where's the money been stashed? 

Ice Princess — Just one glance at this beauty will steal 

your heart. 



Experience other traditional and contemporary challenges from these winning authors: Mark Fetherston, Jeff Crow. Larry Lansberry, 
J.C. Jackson, Robert W. Mangum II, Robert Poppe. David Taylor, Gregory Clark, Steve Skrzyniarz, David L. Dawson, Curtis Boyle, 
Bruce K. Bell, Pat Pugliano, Pat and John Everest, Mike Fahy, Scott Settembre, Darin Anderson, Robert L. Thomas, Terrance Hale, Paul 
Hensel, Philip Courie, Michael Dennison and Robert Dickau. 



The Second Rainbow Book of Adventures sells for only $13.95! 

THREE BONUS PROGRAMS 

WHEN YOU BUY THE SECOND RAINBOW ADVENTURES TAPE! 

That's right. You'll receive a total of 27 fantastic Adventures when you get the Second Rainbow 
Adventures tape. The three bonus games are Castle Thuudo, by Carmen D. Michele; Halls of 
Dungeon Death, by Eric and Mark Riel; and Caves of Kalakh, by Jane Fisher — programs with 
listings too lengthy to include in the book. Save yourself hours of typing listings. Load these great 
Adventures into your computer and run them! 

The Second Rainbow Adventures Tape is only $13.95. 

The tape is an adjunct and complement to the book. Even if you buy the Second Rainbow 
Adventures Tape, you'll need the book for the introductory material and loading instructions. 

Keep your Rainbow Bookshelf up-to-date! 

See Page 221 for additional Rainbow Bookshelf offerings. 
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□ Please send me 

The Second Rainbow 
Book Of Adventures 
for $13.95' 

□ Please send me 

The Second Rainbow 
Adventures Tape 
for $13.95 



Name 




The Rainbow Bookshelf" 



Address 
City 



State 



ZIP 



□ My check in the amount of 



is enclosed." 



Please charge to my: D VISA □ MasterCard □ American Express 

Account Number Exp. Date 

Signature 

Mail to: The Second Rainbow Book of Adventures, 
The Falsoft Building, P.O. Box 385, Prospect, KY 40059 

To order by phone, call: (502) 228-4492 

"Add $1.50 shipping and handling per book. Outside the U.S., add $4. Allow 4-6 weeks for delivery. 
Kentucky residents add 5% sales tax for book and tape. In order to hold down costs, we do not bill. 
U.S. currency only, please. 
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130 63 

END 54 



Listing 1: BIRDS 



'LISTING1 

10 PMODE3,1:PCLS3:SCREEN1,0 

20 A$="F6E6" 

21 B$="F6R6" 

22 C$="R6E6" 

23 D$="E6F6" 

24 E$="F12" 

25 F$="E12" 

26 G$="R12" 

27 H$="R6F6" 

30 DRAW'C2BM10,10"+B$ 
40 DRAW'C2BM15,20 M +A$ 
50 DRAW'C2BM25,20"+A$ 
60 DRAW ,, C2BM35,20"+A$ 
70 DRAW"C2BM40,35"+B$ 
80 DRAW'C2BM50,40"+E$ 
90 DRAW'C2BM60,45"+B$ 
100 DRAW'C2BM70 / 45"+A$ 
110 DRAW"C2BM7 5,55"+A$ 
120 DRAW'C2BM85,60"+A$ 
130 DRAW'C2BM90,70"+A$ 
140 DRAW"C2BM95,75 II +C$ 



E.T.I. Electronic Typing Teacher 

by CHERRYSoft 

Learning to type the right way can save you hours of tedious 
work when entering programs into your CoCo, and this is just 
what ETT was designed to do. Devote a little time every day prac- 
ticing with ETT and before you know it you will be typing with con- 
fidence. Entering those programs will no longer be the chore it 
use to be. 

ETT's video keyboard lets you practice with all the keys labeled, 
the keys blank or only the "home" keys labeled. The visual 
cues guide you while you learn to type without watching your 
fingers. ETT shows your accuracy, response time, and words per 
minute. You will quickly see that you are improving with practice. 

With the sentences provided by ETT learning to type can be fun. 
Over 1000 variations chosen because they include every letter in 
the alphabet. You can also create your own practice sets. This 
outstanding program was written by a certified teacher and pro- 
essional programmer and comes with a ten page student 
manual-study guide. Requires 16K Extended Basic. 
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FREE 
SHIPPING 



29 



95 



assette tm"-X shihkinu Disk 

ETT is being used in schools throughout the U.S. 

See ETT at your favorite dealer or order direct. 

DEALER INQUIRES INVITED 



^CoCo 
G Warthouse 

Where Shopping By Mail is "USER FRIENDLY" 

500A N. DOBSON • WESTLAND, Ml 48185 

Phone (313) 722-7957 



150 DRAW 
160 DRAW 
170 DRAW 
180 DRAW 
190 DRAW 
200 DRAW 
210 DRAW 
220 DRAW 
230 DRAW 
240 DRAW 
250 DRAW 
260 DRAW 
270 DRAW 
280 DRAW 
290 DRAW 
300 DRAW 
310 DRAW 
320 DRAW 
3 30 DRAW 
340 DRAW 
350 DRAW 
1000 GOTO 



•C2BM110 
'C2BM120 
'C2BM130 
'C2BM140 
'C2BM150 
'C2BM140 
'C2BM130 
'C2BM120 
'C2BM120 
'C2BM120 
'C2BM125 
•C2BM120 
'C2BM125 
'C2BM130 
'C2BM135 
'C2BM140 
'C2BM145 
'C2BM145 
'C2BM150 
•C2BM160 
■C2BM160 
1000 



,90"+D$ 
,90"+D$ 
,95"+D$ 
,95"+C$ 
,95"+F$ 
,80"+A$ 
,75"+A$ 
,70"+A$ 
,60"+A$ 
,50"+A$ 
,45"+B$ 
,40"+E$ 
,35"+E$ 
,2 5"+A$ 
,20"+A$ 
,15"+A$ 
,15"+C$ 
,10"+G$ 
,10"+H$ 
,10"+D$ 
,5"+D$ 




Listing 2: FLIGHT 1 

'<LISTING2> 

1 'CREATED BY J. KOLAR, 1985 
10 PMODE3, 1:PCLS3 :SCREEN1,0 

20 A$="F6E6" 

21 B$="F6R6" 

22 C$="R6E6" 

23 D$="E6F6" 

24 E$= M F12" 

25 F$= M E12" 

26 G$="R12 M 

27 H$="R6F6" 

30 DRAW'C2BM10,10"+B$ 

31 FOR Z=1TO100:NEXT 
35 DRAW'C3BM10,10"+B$ 

40 DRAW'C2BM15,20"+A$ 

41 FOR Z=1T075:NEXT 
45 DRAW'C3BM15,20"+A$ 

50 DRAW«C2BM25,20 ,, +A$ 

51 FOR Z=l TO 100 .-NEXT 
55 DRAW I C3BM25,20"+A$ 

60 DRAW'C2BM35,20"+A$ 

61 FOR Z=l TO 150: NEXT 
65 DRAW'C3BM3 5,20 M +A$ 

70 DRAW , C2BM40,3 5"+B$ 

71 FOR Z=1TO100:NEXT 
75 DRAW I C3BM40,35"+B$ 

80 DRAW'C2BM50,40"+E$ 

81 F0RZ=1T075:NEXT 

85 DRAW'C3BM50,40"+E$ 
90 DRAW'C2BM60,45"+B$ 
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SOFTWARE 



' WE GIVE A HOOT ' 

NEW! SNAKES ALIVE 

You must maneuver an ever growing snake through an 

ever more difficult maze and eat the fruit that 

appears. As you progress from level to level the 

screen becomes increasingly difficult. The action 

is controlled by the keyboard so joysticks are not 

required. This game is addictive! 

16K EXT Postpaid Disk $20.95 Cassette $17.95 

NEW! CH1LDRENS GRAPHIC STORYBOOK SERIES 

These delightful children's storys will amuse, amaze 

and educate your children uith words and pictures. 

THE STAR LIGHTER presents an entertaining story and 
illustrates star constellations in graphic displays. 
Requires 64K EXT Tape or 32K EXT Disk. 

THE DRAGON STORY presents a story about a girl and 
a dragon in words and graphic pictures. Requires 64k 
EXT tape or 32K EXT Disk. 

A VISIT TO THE BEACH presents an easy to read story 
about two children and their pets on a visit to the 
beach. Requires 32K EXT Tape or Disk. 

The storybooks are $15.00 Tape or $17.00 Disk. Take 
any two on tape or Disk for $25.00 or all three on 
Tape or Disk for $30.00 

LABEL64 - LABEL64 is a name and address file/print 
system that takes advantage of your 64K. You can deve- 
lop and maintain e mailing list. Print lists or mail- 
ing labels in your choice of 1, 2, or 3 wide. Sup- 
ports 3 or 4 line addresses with phone optional. You 
can sort by last name, first name, Bnd/or zip code. 
You can work with up to 300 records in memory at a time 
We include a second copy for back up at no additional 
charge. Take advantage of your 64K with LABEL64. 
Cassette - 64K EXT Postpaid $24.95 

FILE64 - FILE64 is a data management system designed 
to take advantage of a 64K machine. You can create 
and maintain records on anything you choose. Recipes, 
coupons, household records, financial records - you 
name it. You create records containing up to five 
fields you define. You can search, sort, modify, add, 
delete, save on tape, display on the screen and print 
on a printer. The program could cost you much more 
and we include a back up copy at no additional charge. 
Cassette - 64K EXT Postpaid $24.95 

SAVE $$ Take both our LABEL64 and FILE64 for only 
$40.00 Postpaid. Don't miss this special offerl 
ALCATRAZ ADVENTURE Our newest and we think most in- 
volved adventure. You have been unjustly imprisioned 
and sentenced to death. You must escape to prove 
your innocence. You will face many unique problems 
as you work on your goal. If you liked our BASHAN 
adventure you will love ALCATRAZ. Your adventure 
contains a large vocabulary and some unique features. 
This is a tough one recommended for advanced players. 
32K EXT Postpaid Diak $20.95 Caeaette $17.95 

CUBE ADVENTURE - Cube is a non violent adventure for 
a minimum 16K EXT system. You must locate and enter 
the "CUBE" gathering treasures along the way. You 
will encounter some unique problems as you work on 
your goal. CUBE is an intermediate to hard adven- 
ture suitable for everyone. 
16K EXT postpaid Disk $20.95 Cassette $17.95 

Canadian dealers may contact Kelly Software Dist. 
LTD. P.O. Box 11932 Edmonton, Alberta T5J 3L1 



NOW LABELIII IS AVAILABLE ON DISK! 

LABELUI - (Reviewed in Nov 83 Rainbow) With LABELIII 
you can develop and aeintain a mailing liat. Print li8ti 
or nailing iabela in your choice of 1, 2, or 3 wide. 
Supports 3 or 4 line addressee with phone optional. 
Sort by last name, firat name or zip code. 
16K EXT Postpaid Disk $21.95 Cassette $19.95 

FILEIII - Data management Bystem. With FILEIII you 
can create and maintain recorda on anything you choose. 
Recipea, coupons, household records, financial recorda - 
you name it. You create records containing up to five 
fields that you define. You can search, aort, add, 
delete, modify, display on the Bcreen or Bend to a 
printer. The program is user friendly and user proof. 
Prompting is extensive. A comparable program could 
cost you much more. This one is a bsroain! 
16K EXT Postpaid Diak $21.95 Caeaette $19.95 

PROGRAM FILE - (rev Oct 83 Rainbow) Organize your 
programs. With PROGRAM FILE you create a file of your 
computer programs. You can search, sort, add, modify, 
delete, save to tape and display on the acreen or 
■•end to a printer. 
16K EXT Postpaid Diak $16.95 Caeaette $14.95 

DATA MANAGEMENT PACKAGE - Save $$ Take the three above 
on disk or tape (specify) for only $40.00 Postpaid 

ESPIONAGE ISLAND ADVENTURE - (reviewed in June 84 Rain- 
bow) You have been dropped off on an island by submarine 
You must recover a top secret microfilm and signal the 
sub to pick you up. Problems abound in this 32K EXT 
adventure. 
3-2K EXT Postpaid Disk $20.95 Cassette $17.95 

FOUR MILE ISLAND - You are trapped in a disabled nuclear 
power plant. The reactor is running away. You must 
bring the reactor to a cold shutdown and prevent the 
"China Syndrome". Can you save the plant (and your- 
self)? It's not eB8y! 
16K EXT Postpaid DiBk $20.95 Caeaette $17.95 

KINGDOM OF BASHAN - Our flagahip adventure. Baahan haa 
a very large vocabulary and some unique featurea. You 
muat enter BASHAN (not eeBy), gather the ten treasures 
of the ancient kingdom (even harder) and return to the 
atarting point (harder yet). If you can score the 
maximum 200 points in BASHAN you are an expert! 
3>2K EXT Postpaid Diak $20.95 Caasette $17.95 

ADVENTURE COMBO Save $$ The three above adventuree on 
three caaaettes or one diak (specify) postpaid for only 
(40.00 

ATLANTIS ADVENTURE - This one iB not eaay - in fact 
we challenge you to complete it in 30 deys. If you do 
«• will send you any adventure we sell - postpaid - at 
absolutely no chsrge. . You stsrt on a disabled sub 
near the lost city of Atlantis. You must get the sub 
(and yourself) safely to the surface. Do you think 
Atlsntians are friendly? 
Postpaid 32K EXT Disk $24.95 16K EXT Cassette $21.95 

ADVENTURE STARTER - Learn to play those adventures the 

painless way. You start with an eaay adventure and 

move to an intermediate. Two complete separate non 

violent adventures plu6 hints and tips on adventuring 

in general. Finish this and you will be ready for 

ATLANTIS! 

16K EXT Postpaid Disk $20.95 Cassette $17.95 

C.O.D. orders please add 1 .50 
No Delay For Personal Checks 
In a Hurry? Call (61 5) 238-9458 

OWLS NEST SOFTWARE 

P. O BOX 579 
OOLTEWAH. TN 373*3 





91 FOR Z-- 


=1T0 75:1 


KEXT 


285 


DRAW"C3BM130,25"+A$ 




95 DRAW"C3BM60,45"+B$ 


290 


DRAW"C2BM135,20"+A$ 




100 


DRAW 


'C2BM70, 


45"+A$ 


291 


F0RZ=1T075:NEXT 




101 


FOR ! 


2=1TO150 


:NEXT 


295 


DRAW I C3BM13 5,20"+A$ 




105 


DRAW 


'C3BM70, 


45"+A$ 


300 


DRAW"C2BM140,15"+A$ 




110 


DRAW 


'C2BM75, 


55"+A$ 


301 


FOR Z=1T0 75: NEXT 




111 


FOR Z=1T0125 


:NEXT 


305 


DRAW , C3BM140,15"+A$ 




115 


DRAW 


'C3BM75, 


55"+A$ 


310 


DRAW"C2BM145 , 15"+C$ 




120 


DRAW 


'C2BM85, 


60"+A$ 


311 


FOR Z=1T075:NEXT 




121 


FOR I 


5=1 TO 12 5: NEXT 


315 


DRAW"C3BM145,15"+C$ 




125 


DRAW 


•C3BM85, 


60"+A$ 


320 


DRAWC2BM145 , 10"+G$ 




130 


DRAW 


'C2BM90, 


70"+A$ 


321 


FOR Z=1T0 75: NEXT 




131 


FOR Z=1T075: 


NEXT 


325 


DRAW"C3BM145 ; 10"+G$ 




135 


DRAW 


'C3BM90, 


70"+A$ 


330 


DRAWC2BM150 , 10"+H$ 




140 


DRAW 


•C2BM95, 


75"+C$ 


331 


FOR Z=1T0125:NEXT 




141 


FOR Z=1T0175 


:NEXT 


335 


DRAW"C3BM150, 10"+H$ 




145 


DRAW 


'C3BM95, 


75"+C$ 


340 


DRAW"C2BM160,10"+D$ 




150 


DRAW 


'C2BM110 


,90"+D$ 


341 


FOR Z=1T0 75: NEXT 




151 


FOR 


S=1TO100 


:NEXT 


345 


DRAWC3BM160 , 10"+D$ 




155 


DRAW 


•C3BM110 


,90 M +D$ 


350 


DRAW"C2BM160 , 5"+D$ 




160 


DRAW 


'C2BM120 


, 90"+D$ 


351 


FOR Z=1TO200:NEXT 




161 


FOR ! 


2=1TO100 


:NEXT 


355 


DRAW"C3BM160,5"+D$ 




165 


DRAW 


'C3BM120 


, 90 M +D$ 


1000 GOTO 10 




170 


DRAW 


'C2BM130 


, 95 M +D$ 








171 


FOR Z=l TO 12 5: NEXT 








175 

180 


DRAW 
DRAW 


'C3BM130 
'C2BM140 


,95"+D$ 
, 95"+C$ 






r-y^ 






^ 


f7* 


97 




181 


FORZ= 


=1T0125: 


NEXT 






171 


37 




185 


DRAW 


'C3BM140 


,95"+C$ 






260 


.144 




190 
191 
195 


DRAW , C2BM150,95"+F$ 
FOR Z=1T0 175: NEXT 
DRAW"C3BM150,95"+F$ 


Listi 




END 


203 




ng 3: FLIGHT 2 












200 


DRAW 


C2BM140 


f 80"+A$ 


' 


<LISTING3> 




201 


FOR Z=1T0125 


:NEXT 


1 ' 


CREATED BY J. KOLAR, 


1985 


205 


DRAW"C3BM140 


,80"+A$ 


10 


PMODE3 , 1 : PCLS3 : SCREEN1 , 


210 


DRAW"C2BM130 


,75"+A$ 


11 


DRAW"C1BM0 , 140R40D10R10U90R10 


211 


FOR Z=1TO100 


:NEXT 


D30R50D50R40U40R10D40R10U90R40D1 


215 


DRAW 


C3BM130 


,75 M +A$ 


00R10U10R10D10R10U40R20BD50L2 55 " 


220 


DRAW 


C2BM120 


70»+A$ 


12 


PAINT (5, 145) ,2,1 




221 


FORZ= 


=1T075:NEXT 


13 


PAINT(5,190) ,1,1 




225 


DRAW"C3BM120 


,70 M +A$ 


20 


A$="F6E6" 




230 


DRAW 


•C2BM120 


,60"+A$ 


21 


B$="F6R6" 




231 


FOR Z=1T075:NEXT 


22 


C$="R6E6" 




235 


DRAW 


C3BM120 


60"+A$ 


23 


D$="E6F6" 




240 


DRAW 


C2BM120 


50"+A$ 


24 


E$="F12" 




241 


FOR Z=1T075:NEXT 


25 


F$="E12" 




245 


DRAW 


C3BM120 


f 50"+A$ 


26 


G$="R12" 




250 


DRAWC2BM125 


,45"+B$ 


27 


H$="R6F6" 




251 


FOR Z=1T075:NEXT 


30 


DRAW"C2BM10,10"+B$ 




255 


DRAW"C3BM125 


r 45"+B$ 


31 


SOUND12 5,3 




2 60 


DRAW"C2BM120 


,40"+E$ 


35 


DRAW'C3BM10, 10"+B$ 




261 


FOR Z=1T075:NEXT 


40 


DRAW"C2BM15,20"+A$ 




265 


DRAW"C3BM120 


f 40"+E$ 


41 


SOUND 89,2 




270 


DRAW"C2BM12 5 


, 35"+E$ 


45 


DRAW"C3BM15 , 20"+A$ 




271 


FOR Z=l TO 100: NEXT 


50 


DRAW"C2BM25,20"+A$ 




275 


DRAW 


C3BM125 


35"+E$ 


51 


SOUND125,3 




2 80 


DRAW 


C2BM130 


25 M +A$ 


55 


DRAW , C3BM25,20"+A$ 




281 


FOR Z 


=1T075:NEXT 


60 


DRAW'C2BM35,20"+A$ 
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WELL RESPECTED 
HIGHLY ACCLAIMED 



Elite*Word is a terrific word processor with an im- 
pressive list of features, yet it's easy to learn and use. 
-Stuart Hawkinson, HOT COCO 



I like Elite* File . . . it's power and speed have to be 
seen to be appreciated. 

-Ed Lowe, RAINBOW 



Bruce Cook's Elite*Calc is, . . . potentially one of the 
great Color Computer programs. ... is the easiest to 
use and most intuitive of the major CoCo speadsheet 
calculators." 

-Scott Norman, HOT COCO 



WORD PROCESSOR 

Elite*Word is highly respected for its powerful 
features AND excellent ease-of-use. Don't compro- 
mise one for the other . . . Elite* Word is ready to do 
your letters and reports. 32K req. 

Ehte'Word (Disk) -Radio Shack "90-0184 S69.95 

Elite* Word (Tape) -Radio Shack "90-0 1 83 S69.95 

Elite* Word/ OS 9 -Radio Shack 090-01 86 S79.95 

Elite* Word / PBJ' (Disk or Tape) 80 column display S 79.95 



SPELLING CHECKER 

Elite*Spel checks your text against its powerful 
24,000 word dictionary, and does the job FAST. 
You won't wait long with Elite*Spel reading your 
text. 32K req. 

Elile*Spel(Diskonly)-RadioShack»90-OI85 S39.95 
Elite*Spel (When purchased with 

Elite* Word (rom ELITE) S 15.00 

Elite*Spel/PBJ' (Disk onlyl 80 column display. S49.95 





TERMINAL PROGRAM 



Elite*Comm turns your CoCo into a powerful 300 
baud terminal, and it's smooth and easy to use. 

Elite*Comm (Tape or Disk) S39.95 

Elite *Comm /PBJ - (Tapeot Disk) 

80 column display S49.95 




Too often, "power" is achieved at the expense of 
simplicity of operation. Elite Software has more than 
met that challenge with their Elite»Word . . . 
-Don Lloyd, ONLINE TODAY -COMPUSERVE 



Not all software "plays" the same . . . 

Our programs have been widely recognized 
for their ease-of-use, powerful features, 
performance speed, and cross-file com- 
patability. 

Elite Software DOES make a difference. 



2-llte ^<yf\tusate 



SPREADSHEET 

Elite*Calc/3.0 gives you more features than the 
widely acclaimed Elite»Calc. You get Window 
Lock, 4 screen displays, expanded worksheet 
storage and more. 32K req. 

Elite*Calc/3.0 (Disk) - Radio Shack »90-0 1 88 . S69.95 
Elite*Calc/3.0 (Tape) -Radio Shack "90-0 1 97 S69.95 

Elite *Calc (Original ver. 1 .2) Tape or Disk S39.95 

Elite *Calc/3.0/ PBJ - (Disk only) 80 column display S79.95 



DATABASE MANAGER 



Elite*File is the database manager that handles 
more total records, larger records, and manipulates 
data faster. Whether your data is inventory items or 
recipes, Elite*File is the correct choice. 32K req. 

Elite»File (Disk onlyl-Radio Shack »90-0l 89 , ... S74.50 
Elite'File/PBJ" (Disk only) 80 column display .... S79.95 
•Requires PBJ Word Pok hardware 









(ifclnCrrtl 
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Buy direct: Add $3.00 shipping 
PA residents add 6% sales tax 



II lit a Jtofit ware 

now at Radio /TiaeK stores 

AvallaDJ* via E*pr»« Onjvr 



201 Penn Center Blvd., Suite 301, -Pittsburgh, PA 15235 • (412)795-8492 




Elite'Home lets your Color Computer manage some very 
important household items. In creating Elite'Home, we se- 
lected the most requested home database applications, 
and custom designed Elite»Home to handle them. All of 
these custom applications are completely finished, fully 
detailed and READY TO USE. Just load-in YOUR data. One 
major advantage is that Elite'Home contains a modified 



version of our highly respected Elite*File program. This 
feature insures that you'll get fast and efficient processing 
of your information. without having to learn all the messy 
details about databases. Look at the applications below. . . 
at less than $10 per application area, Elite»Home offers an 
exceptional user value. 



COLLECTIONS —Build a complete catalog of all your personal 
collections, like Stamps. Photos. Records, etc. 

IMPORTANT DATES -Quicklyl What dates are coming up that are 
important to you? See. you need Elite»Home already to remember 
Birthdays. Anniversaries, Quarterly payments, etc. 

CREDIT CARD INVENTORY -If you lost your wallet/purse 
tomorrow, who would you contact, and with what information? 
Elile'Home would remember. 

HOME INVENTORY —In case of fire or theft, could you remember all 
details for lost items? Why not let your children catalog your po- 
ssessions on Elite'Home. You gain protection, they gain computer 
database experience. 

EXCEPTIONAL VALUE 

$59.95 Order Nowl 32K, Disk Only 



MAILING LABELS —Stop hand addressing the same envelopes when 
paying bills every month. Elite»Home is ready to do your mailing lists 
for Clubs. Church, Leagues, and Bill paying. 

PHONE BOOK -OK. so we all keep a personal phone book ... 
whether It's in the kitchen drawer or our briefcase. If you used the 
Elite'Home phone book, you could ask for a display of all the card 
club phone numbers, do a search for the "contractor" that did that 
work last year (what was his name anyway?), etc. 

CAR REPAIRS— When was the last time you changed oil in that 
car(s) of yours? When is state inspection due? Let Elite»Home keep 
track of your service records, and inspection dates. 

CHECKS —At tax time, do you go back through your check book and 
total checks for donations? What about the total for medical ex- 
penses? With data from your checks stored on Elite'Home, you can 
quickly select any grouping of checks for a display and total. 



Not available thru Radio Shack 




Elite»Desk brings a calculator, calendar, note pad. and 
ASCII table to your Color Computer. You can use 
Elite'Desk by itself, or have it run co-resident with any pro- 
gram in the Elite Sottware series. Imagine being able to 
"pull down" a calendar or calculator while typing text on 
Elite»Word. saving notes while using Elite»Calc. or "call- 
ing-up" an ASCII table while working on a Basic program. 



We've made Elite»Desk fully re-locatable so you can try it 
with other programs as well. Whether you use Elite'Desk 
by itself, or along-side another program, it's a valuable 
addition to your software library. Remember, if you've ever 
reached for a calculator, calendar, or note pad while using 
your Color Computer . . . then you need Elite'Desk. 






CALCULATOR -Full featured, with all standard functions . . . 

plus 3 memories. Also works in HEX as an added feature for 

programmers. 

CALENDAR — Shows all days in any month. Lets you "scroll" 

through months and years with the arrow keys. 



2f 



I6K if used alone 

64K with other programs 



Buy direct: Add S3.00 shipping 
PA residents add 6% sales tax 



d-lite ^OTjturcite 



ASCII TABLE -Full table displays all hex and ASCII values. 
An excellent quick-reference tool. 

NOTE PAD -Write and save a full screen of text for later 
reference. Also includes directory and kill-file capability. 

EXCEPTIONAL VALUE 

$49.95 Order NOWI Disk Only 

Not available thru Radio Shack. 



201 Penn Center Blvd., Suite 301, • Pittsburgh, PA 15235 • (412)795-8492 



Move your Co Co into the "big leagues " with 
£Iite Saturate and PBJ Word Pak II 

FULL 80 COLUMN CAPABILITY 



No Tools— Everything plugs together 



■ ELITE 50FTUSRE 5 P8J u » - P .< . 

|tt last... gcu can jiv* iCm Color Capiter a 'oil 90 character K-sen 
displag, WDh».» pxarful software list's Nay lo us*. Elite soft-ar, w 
the PBJ U3rd-Par... truly a uiming ccKiinatian. 

It's in,... all 3 ou new for an 80 colum display is uord-Pal II. a 1" Cable 
'for du» users i. and a nonitor. Everything plugs together, 10 hardware 
(•edifications are needed, 

Imagine using the pc**r of a prograw live Elite****d -itr an 90 caluevt 
display. Elite-iOrafBJp-ecticallj displays gour final docuwnt. Just lo* 
at this screen. . . gou see fliajit-5ide tot justification, Page Nmeerirg. 
Botto» Paje Margin. Page SreaV. lop Margin, ard fcito-4.un Centerirg. 
Elitartam/FBJ can displag e-*i we' E!ite«Spel/P8J -ill find jour spelling 



•mxi. «rd just lot* at EhteKalcPW wth an 80 colum screen displeg.. 



Elite* Word/PBJ* (Disk or Tape) 80 column display 
$79.95 





• No Hardware 


modifications 
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EliteaCalc/S.O/PBJ* (Disk only) 80 column display 
S79.95 



Elite»Spel/PBJ - (Disk only) 80 column display 
S49.95. Only $20.00 when purchased with 
EliteaWord/PBJ. Elite-File/PBJ" (Disk only) 
80 column display $79.95. Elite«Comm/PBJ- 
(Tape or Disk) 80 column display $49.95. 



Hardware required: 
WORD-PAK II 

Our Price $125.00 
$3.00 Shipping/Handling 

"Y" Cable Connector $25.00 



Disk Manager/PBJ . . . Lets you move files from 
one disk to another. Also, purge files or move Ihem 
to tape. Works with one or more disk drives. List 
$39.95. 



Mot available thru Radio Shack. 




READY NOW! An excellent implementation ol the famous 
LISP language, now available for the Color Computer. Now 
you can have the language that has been gaining much 
attention in the field of artificial intelligence and other 
applications. CoCo-LISP supports all the LISP primitives, 
including data structure (LISTs), recursive functions, and 

• Use functions as data for other functions 

• Permits functions to be called recursively 

• Add your own functions; use as if built-in 

• Write self-modifying programs 

• Over 70 built-in functions 

SUPER VALUE 

$89.95 Order NOW I 



garbage-collection. CoCo-LISP has over 70 built-in func- 
tions, super performance, and a high-res, full-screen 
editor for program development. If you already know the 
LISP language, and have been waiting for a Color Com- 
puter version, CoCo-LISP is for you. 64K, RSDOS required. 

• Supports all LISP primitives 

• High-res screen with true upper/lower case display 

• Full screen editor for program development 

• Full disk access and printer supported 



64K Disk only. 



Ellin Sofitwate 



Not available thru Radio Shack. 
201 Penn Center Blvd., Suite 301, -Pittsburgh, PA 15235 • (41 2)795-8492 



61 SOUND159,2 


260 


DRAW"C2BM120,40"+E$ 


65 DRAW"C3BM3 5,20"+A$ 


261 


SOUND89,2 


70 DRAW"C2BM40,35"+B$ 


265 


DRAW"C3BM120,40"+E$ 


71 SOUND125,3 


270 


DRAW"C2BM125,35"+E$ 


75 DRAW"C3BM40',35"+B$ 


271 


SOUND125,2 


80 DRAW"C2BM50,40"+E$ 


275 


DRAW"C3BM125,35"+E$ 


81 SOUND89,2 


280 


DRAW"C2BM130,25"+A$ 


85 DRAW"C3BM5/3,4J3"+E$ 


281 


SOUND89,2 


9/3 DRAW"C2BM60,45"+B$ 


285 


DRAWC3BM130 , 25"+A$ 


91 SOUND89,3 


2 90 


DRAW"C2BM13 5,20"+A$ 


95 DRAW"C3BM60,45"+B$ 


291 


SOUND89,2 


100 DRAW"C2BM70,45"+A$ 


295 


DRAW M C3BM135,20"+A$ 


101 S0UND159,2 


300 


DRAW"C2BM14/3,15"+A$ 


105 DRAW"C3BM70,45"+A$ 


301 


SOUND89,2 


llj3 DRAW"C2BM75,55"+A$ 


305 


DRAW"C3BM140,15"+A$ 


111 SOUND133,2 


310 


DRAW"C2BM145,15"+C$ 


115 DRAW"C3BM75,55"+A$ 


311 


SOUND 8 9,2 


12 DRAW"C2BM85,60"+A$ 


315 


DRAW"C3BM145,15"+C$ 


121 SOUND133,2 


320 


DRAWC2BM145 , 10"+G$ 


125 DRAW"C3BM85,60"+A$ 


321 


SOUND89,2 


130 DRAW"C2BM90,70"+A$ 


325 


DRAW"C3BM145,10"+G$ 


131 SOUND89,2 


3 30 


DRAWC2BM150, 10"+H$ 


135 DRAW"C3BM90,70"+A$ 


331 


SOUND13 3,2 


140 DRAW"C2BM95,75"+C$ 


335 


DRAWC3BM150 , 10"+H$ 


141 S0UND89,2 


340 


DRAW"C2BM160,10"+D$ 


145 DRAW"C3BM95,75"+C$ 


341 


SOUND89,2 


150 DRAW"C2BM110,90"+D$ 


345 


DRAW"C3BM160,10"+D$ 


151 SOUND125,2 


350 


DRAW I, C2BM160,5"+D$ 


155 DRAW"C3BM110,90"+D$ 


351 


SOUND 176,2 


160 DRAW"C2BM120,90"+D$ 


355 


DRAW"C3BM16/3,5"+D$ 


161 SOUND125,2 


1000 FOR Z=l TO 1000: NEXT :GOTO10 


165 DRAW I, C3BM120,90"+D$ 






170 DRAW"C2BM130,95"+D$ 


Listing 4: BATS 


171 SOUND125,2 






175 DRAW"C3BM130,95"+D$ 


* 


CBATS> 


180 DRAW"C2BM140,95"+C$ 


1 ' 


(C) 1985, J. KOLAR 


181 SOUND133,2 


10 ] 


PMODE3 , 1 : PCLS3 : SCREEN1 , 


185 DRAW"C3BM140,95"+C$ 


11 1 


DRAWC1BM0, 135R44D10R6U90R10D 


190 DRAW"C2BM150,95"+F$ 


30R50D50R40U40R10D40R10U90R40D10 


191 SOUND170,2 


0R10U10R10D10R10U40R20BD54L255" 


195 DRAW"C3BM150,95"+F$ 


12 ] 


PAINT (5, 145) ,2,1 


200 DRAW"C2BM140,80"+A$ 


13 ] 


PAINT (5, 190) ,1,1 


201 SOUND13 3,2 


20 A$="F6E6" 


205 DRAW" C3BM140, 8/3 "+A$ 


23 1 


D$="E6F6" 


210 DRAW"C2BM130,75"+A$ 


30 


DRAW"C2BM=X; ,=Y;"+A$ 


211 SOUND 125,2 


32 GOSUB100 


215 DRAW"C3BM130,75"+A$ 


35 


DRAW"C3BM=X; ,=Y;"+A$ 


220 DRAW"C2BM120,70"+A$ 


40 


Z>RAW"C2BM=X ; , =Y ; "+D$ 


221 SOUND89,2 


42 ( 


3OSUB100 


225 DRAW"C3BM120,70"+A$ 


45 


DRAW"C3BM=X; ,=Y;"+D$ 


230 DRAW ,, C2BM120,60"+A$ 


50 


3RAW"C2BM=X; ,=Y;"+A$ 


231 SOUND89,2 


52 ( 


3OSUB100 


235 DRAW"C3BM120,60"+A$ 


55 


DRAW " C 3 BM=X ; , = Y ; " + A $ 


240 DRAW"C2BM120,50"+A$ 


60 


DRAW"C2BM=X;,=Y;"+D$ 


241 SOUND89,2 


62 ( 


3OSUB100 


245 DRAW"C3BM120,50"+A$ 


65 


DRAW"C3BM=X; ,=Y;"+D$ 


250 DRAW"C2BM125,45"+B$ 


70 X=RND(25)*10-10:Y=RND(15) *10 


251 SOUND89,2 


71 GOTO30 


255 DRAW"C3BM125,45"+B$ 


100 


FOR Z=1TO10: NEXT: RETURN ^ 
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GRAPHICS ENTERTAINMENT 



16K 
ECB 



RAINBOW 

■ •• ••Vl— 



We interrupt this program for an important announcement . . . 

A Peace Treaty for Computer Hackers 

and Couch Potatoes 

Bill Bernico 




What's the matter? Is your family 
on your case because your com- 
Jputer's always hooked up to the 
television and they can't watch their 
favorite shows? Now you can "solve" that 
problem with TV Shows (provided they 
haven't already disconnected you from the 
tube). 

Actually "solve" is not quite accurate. 
Though this program doesn't truly solve 
that very real dilemma, it does offer a 
tongue-in-cheek response to it by using the 
CoCo's sound and graphics capabilities. 

Upon running the program you'll see a 
familiar sight — a television set. Along the 
left side of the screen you are presented 
with a list of nine choices. The last seven 
are things to watch on the TV and the first 
two are options that allow you to either 
turn the television on or off. Your choice 



Bill Bernico is a self-taught computerist who enjoys golf, 
music and programming. He is a drummer with a rock band 
and lives in Sheboygan, Wisconsin. 
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is selected by using the up and down 
arrows. When you have chosen your 
option, press ENTER. 

What! You selected a television show 
but nothing happened? Did you re- 
member to turn the set on? Just as in 
real life, you can't watch anything until 
you first turn on the TV. Move the 
arrow to the top and press ENTER. Now 
the set's on and you can go ahead and 
select a program. 

When you're finished watching tele- 
vision, don't forget to turn it off again. 
You can do this by moving the arrow up 
to the second option and pressing 
enter. Once the set is turned off, trying 
to select anything else is useless; the set 
has to be on first. 

Any questions about how this pro- 
gram was constructed may be directed 
to me at my address in the listing (lines 
20-40). Please send an SASE for a 
reply. □ 



TU SHOUS 


Sampl 
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■ Printouts 

TU SHOUS 
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The listing: TV SHOWS 



•TELEVISION SHOWS 
'BY BILL BERNICO 
'708 MICHIGAN AVE. 
'SHEBOYGAN, WI 53081 
'(414) 459-7350 



10 

20 

30 

40 

50 

60 ' 

70 CLEAR 500 

80 SP$="BR6 

90 PD$="BR3R 

100 WA$="F2R2E2UDF2R2E2UDF2R2E2U 

DF2R2E2UDF2R2E2UDF2R2E2UDF2R2E2U 

DF2R2E2UDF2R2E2UDF2R2E2UDF2R2E2U 

DF 

110 N1$="BR3NU4 

120 N3$="BR3R3U2NL2U2NL3BD4 

130 A$="BR3U3ERFDNL3D2 

140 B$="BR3U4R2FGNL2FGL2BR3 

150 C$="BR4REGLHU2ERFBD3 

160 D$="BR3U4R2FD2GL2BR3 

170 E$="BR3NR3U2NR2U2R3BD4 

180 F$="BR3U2NR2U2R3BD4 

190 G$="BR3BU4BR3L2GD2FREULBR2BD 

2 

200 H$="BR3U4D2R3U2D4 

210 I$="BR3R2LU4NLRBD4 

220 J$="BR3BUFREU3LR2BD4 

230 K$="BR3U2RNF2NE2LU2BR3BD4 

240 L$="BR3NR3U4BR3BD4 

250 M$="BR3U4FRED4 



260 N$="BR3U4F3DNU4 

270 0$="BR3BUU2ERFD2GLNHBR 

280 P$="BR3U4R2FGL2BR2BD2 

2 90 Q$="BR3BUU2ERFD2GNUNRLHBR3BD 
300 R$="BR3U4R2FGL2RF2 

310 S$="BR3R2EHLHER2BD4 
320 T$="BR3BU4R4L2D4BR 
330 U$="BR3NU4R3NU4 
340 V$=*'BR3BU4D3FRENU3BD 

3 50 W$="BR3NU4ERFNU4 

3 60 X$="BR3UE2UDGHUDF2D 

370 Y$="BR3BU4DFEUDGD2BR 

3 80 PMODE4,l:PCLSl:SCREENl,l:COL 

OR0 , 1 : DRAWS4BM130 , 170C0U90R100D 

90L100BE9U72R70D72L70": PAINT (142 

,91) ,£,0: CIRCLE (220, 100) , 7 : FOR X 

=120 TO 150 STEP10:CIRCLE(2 20,X) 

,4:NEXT:CIRCLE(178,80) ,11,0,1, .5 

,1:DRAW"BM178,70NH30E30BM220,100 

U7D14": CIRCLE (148, 40) ,2 

390 CIRCLE (208, 40) , 2 : PAINT (178 , 7 

7) ,0,0:DRAW"BM10,9S8"+T$+V$+SP$+ 

S$+H$+0$+W$+S$ : DRAW"BM10 , 11R50 

400 DRAW"S4":LINE(17,39)-(90,31) 

, PSET , B : PAINT (18, 36), 0,0: DRAW"BM 

16 , 37Cl"+T$+U$+R$+N$+SP$+0$+N$+S 

P$+T$+V$ : DRAW H C0" : LINE ( 17 , 54) - (9 

0,46) ,PSET,B:PAINT(18,51) ,0,0:DR 

AW"BM16 , 52Cl"+T$+U$+R$+N$+SP$+0$ 

+F$+F$+SP$+T$+V$ 

410 DRAWS4BM15, 68C0"+N$+E$+T$+W 

$+0$+R$+K$+SP$+N$+E$+W$+S$ : DRAW" 

BM15 , 83 "+C$+A$+R$+SP$+C$+A$+R$+E 

$+SP$+S$+H$+0$+W$:DRAW"BM15,98"+ 

W$+E$+S$+T$+E$+R$+N$+SP$+M$+0$+V 

$+I$+E$:DRAW"BM15,113"+T$+H$+E$+ 

SP$+L$+0$+V$+E$+SP$+B$+0$+A$+T$ 

420 DRAW"BM15,128"+M$+U$+S$+I$+C 

$+SP$+T$+E$+L$+E$+V$+I$+S$+I$+0$ 

+N$:DRAW"BM15,143"+C$+0$+P$+S$+S 

P$+A$+N$+D$+SP$+R$+0$+B$+B$+E$+R 
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$+S$ : DRAW M BM15 , 158"+T$+H$+R$+E$+ 

E$+SP$+S$+T$+0$+0$+G$+E$+S$ 

430 H=0:V=9 6:ZZ=0 

440 BB$="R10NH3G3 

450 DRAW"C0BM=H; ,=V;"+BB$ 

4 60 II$=INKEY$ 

470 IF II$=CHR$(94)THEN DRAWC1B 

M=H; ,=V;"+BB$: SOUND 210,1:V=V-15 

480 IF II$=CHR$(10)THEN DRAW'CIB 

M=H ; , =V ; "+BB$ : SOUND 2 10 , 1 : V=V+15 

490 IF II$=CHR$(13)AND V=3 6 AND 

ZZ=0 THEN 820 

500 IF II$=CHR$(13)AND V=51 

ZZ=1 THEN 810 

510 IF II$=CHR$(13)AND V=66 

ZZ=1 THEN 610 

520 IF II$=CHR$(13)AND V=81 

ZZ=1 THEN 660 

530 IF II$=CHR$(13)AND V=9 6 AND 

ZZ=1 THEN 680 

540 IF II$=CHR$(13)AND V=lll AND 

ZZ=1 THEN 700 
550 IF II$=CHR$(13)AND V=126 AND 

ZZ=1 THEN 710 
560 IF II$=CHR$(13)AND V=141 AND 

ZZ=1 THEN 730 
570 IF II$=CHR$(13)AND V=156 AND 

ZZ=1 THEN 750 



AND 



AND 



AND 



580 IF V>156 THEN V=156 

590 IF V<36 THEN V=3 6 

600 GOTO 450 

610 GOSUB 830 :DRAW"C0": CIRCLE (17 

6,120) ,19:CIRCLE(176,124) ,3 

620 CIRCLE (169 ,117) ,4,0, . 9 : CIRCL 

E( 183 ,117) ,4,0, . 9 .-DRAW" BM17 1,12 6 

R10DL10DR10DL10BM165 , 114R7UL7BR1 

5R7DL7BM170,129F3R6E3BM176,102D3 

FDFDRDRDR8F2DFD6FRBM17 6,104DGDGD 

LDLDL8G2DGD6GLBM166,135GDGDGLGL9 

GLGLGDGDGDGDGDG3BM187 , 135FDFDFRF 

R9FRFRFDFDFDFBM165, 13 5 

630 DRAW"M176,160M189,135D12L5F4 

M176 , 161LBM164 , 137D10R4G4M176 , 16 

" : CIRCLE ( 177 , 142 ) , 4 : PAINT (177,1 

42) ,0,0:DRAW"BM177,13 9DF2DF2DF2B 

M177,139DG2DG2DG2BM175,142D14RU1 

4RD15RU14": PAINT (177, 103) ,0,0: PA 

INT(175,103) ,0,0:PSET(169,117) :P 

SET(183,117) 

640 DRAWBM149 , 96"+B$+U$+L$+L$+E 

$+T$+I$+N$:FOR X=l TO 2000 .-NEXT: 

GOSUB830 : DRAW"BM142 , 96"+N$+E$+W$ 

+S$+SP$+F$+L$+A$+S$+H$ : DRAWBM15 

, 124"+R$+A$+I$+N$+B$+0$+W$ : DRAW 

"BM150,132"+M$+A$+G$+A$+Z$+I$+N$ 

+E$:DRAW"BM141,140"+N$+A$+M$+E$+ 



GIVE SPEED AND POWER TO YOUR COCO-2! 



VRBO 
BASIC. 



}f\f ith TURBO BASICS you can get for yourTRS-80 color 
computer 2 the speed of a compiler plus the flexibility of an 
interpreter. You don't need to call a special program to 
compile your BASIC program. TURBO BASIC m is compatible 
with DISK-BASIC and you can run your already existing pro- 



grams without trouble. Here are some features of TURBO 
BASICS 

Look at this benchmark for the "Sieve of Erathosthene" 
program. 





COCO-2 


APPLE II 


IBM 


TIME 
(SEC.) 


TURBO BASIC 


DISK BASIC 


EXPEDITER 
(COMPILER) 


APPLESOFT 


COMPILER 


BASICA 


31.3 


192.9 


34.9 


159.0 


20.1 


146.5 



-8 caracters variables 

-64K RAM access without special command 
-DISK-BASIC commands (ROM 1.0 or 1.1) 
-Integer range form - 65535 to * 65535 
-Automatic repeat key hold 
and more... 

Why use a slow BASIC if you can afford a fast and improved 
BASIC for only 39,95$? Available on diskette or cassette. 



□ Check enclosed □ Visa 

□ Master Card □ American Express 

Account Number 

Signature 



Card Expiration Date- 
Name 

Address 

City 



State 



Zip. 



Sainte-Foy Stanford Toronto 



DIDAKTEK Po. Box. 9755 Sainte-Foy. Quebec 

G1V 4C3 CANADA 

Tel.: 1-800-463-5369 1-418-651-8321 
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More than a book . . . 

A MILESTONE 




F '&m trm putlrtnert ol 

THE RAINOOW.* In* Color CompuW Mooiniy Mvgumi 



Iso Available! 



Today's programmers use short modules of 
readable code to build complex programs. The 
OS-9 operating system and the high level 
languages it brings you make the job easy. 

OS-9 has s< 3 going for it that you 

need a guide as comprehensive and thorough 
as The Complete ■ 9 to 

show you ho > and realize the 

potential of this e/ ent 

implementation 1 
philosophy. 

Co-authored by Puckett end Pel< 

Dibble — t ■ 

9 — The Complete RSfnhow Quia 

demystifies the dyr. 

gives the Color Computer more pow« 

flexibility than man 

on the market . . . end gives 

confidence to reach new programming he 

With The Complete ide To 

you will be prep 

the mull; 
standards for C 
For only 



The Rainbow Guide To OS-9 Disk. An adjuno 
ok for the tutorials, and the pao; 
thy prograi v 



>ok rou'll v/anf 
ours of typing in 



□ Please send me The 

Complete Rainbow Guide To 
OS-9 for $19.95.* 



□ Please send me The Rainbow 
Guide To OS-9 Disk (a 
package of two disks) for 
$31.* Does not include book. 



Name 



Address 



Signature 




City 



State 



ZIP_ 



□ My check in the amount of 



is enclosed. 



VISA' 




MatlwCatd) 



-Card Expiration Date 



□ VISA □ MasterCard □ American Express 

Account Number 

Mail to: 

The Complete Rainbow Guide to OS-9, The Falsoft Building, P.O. Box 385, Prospect, KY 40059 

To order by phone call: (502) 228-4492 

"Add $1.50 per book shipping and handling in U.S. Outside U.S. add $4 per book. Allow 4 weeks for delivery. KY residents add 
5% sales tax. In order to hold down costs, we do not bill. ALL ORDERS IN U.S. FUNDS. 
OS-9 is a trademark of Microware Systems Corporation. 



D$+SP$+N$+0$+PD$+SP$+Nl$ 

650 DRAW"BM155, 148"+A$+G$+A$+I$+ 

N$+PD$:FOR X=l TO 3:QZ$="1;2;3;4 

; 5 ; 6 ; 7 ; 8 ; 9 ; 10 ; 11 ; 12 ; " : PLAY"T905L 

24V15;":PLAY QZ$: NEXT: GOTO 450 

660 GOSUB 8 30 :DRAW"BM14 3, 100 "+C$ 

+A$+R$+SP$+C$+L$+I$+N$+I$+C$ : DRA 

W"BM141,140R68 M : CIRCLE (157, 135) , 

5 : CIRCLE (192, 135), 5: CIRCLE (157,1 

35) ,l:CIRCLE(192,135) ,1:DRAW"BM1 

62,136R25BM147,136NR3U20R30F7R18 

D12L3BM150 , 118ND6R17D6L17R9U6BR1 

1ND6R5F6ND12L11D12 

670 FOR X=l TO 1500 : NEXT: EXEC 43 

345:DRAW"BM184,123E13":FOR K=20 

TO 45 STEP.2:POKE 140 ,RND(40) +K: 

EXEC 43345:NEXT:GOTO 450 

680 GOSUB 830:DRAW"BM141,120M158 

, 110ND2M164 , 104D6M17 1 , 116D2M178 , 

13 2D2GDGLGLGNH5LGL2HLHUHUHLHLHL2 

HL2HUHU2HU2BM141, 146E15" : CIRCLE ( 

167,120) ,2:CIRCLE(175,133) , 2 : DRA 

W"BM142 , 120ND10BR3BU2ND10BR3BU2N 

D10BR3BU2ND10BR3BU2ND10BR3BU2D10 

BM179,134R30BL48L8 

690 DRAW"BM186,134E12G3H3F12BM19 

3,134UERFDBM186,134BE9BU4H2U2E4U 

2H4U2E4U2":FOR X=l TO 2:PLAY"04T 

4L9CP8L12CCP8L12CCP8L12CGP8L12EG 

P8L12EGP8L12E" : NEXT : PLAY"L3C" : GO 

TO 450 

700 GOSUB 830:DRAW M BM147,100"+L$ 

+0$+V$+E$+SP$+B$+O$+A$+T$ : DRAWB 

M148,128NR48R8E3NR26E6R4G2R22G3N 

D3E3L4E7L5G7L5E7L5G7R19G3D3R12D7 

L44H5BM140,13 4"+WA$:GOTO 450 

710 GOSUB 830:DRAW"BM145,125C0U3 

0R10F15E15R10D30L12U18G13H13D18L 

12BM187 , 116E8G4FRFRFRFRFRFBM198 , 

107FRFRFRFU10BM140,140R68BD3L68B 

D3R68BD3L68BD3R68 " : CIRCLE ( 150 , 14 

2) ,2:CIRCLE(158,149) ,2:CIRCLE(16 

6,152) ,2:CIRCLE(174,14 6) ,2:DRAW" 

BM151, 142U8BM159 , 149U8 

720 DRAW II BM167,152U8BM175,146U8B 

M180 , 140D12 " : CIRCLE ( 187 , 150 ) , 2 : C 

IRCLE(195,155) , 2 : CIRCLE (2,03 , 145) 

, 2 : DRAWBM188 , 150U8BM196 , 155U8BM 

204, 155U8":PLAY"V15T8L403CEG04CP 

403G04L3C":GOTO 450 

730 GOSUB830:DRAW"BM150, 100C0"+D 

$+R$+A$+G$+N$+E$+T$ : DRAW"BM172 , 1 

10M176,117M185,117M177,12 2M180,1 

29M172,12 6M165,12 9M168,122M161,1 

17M169 , 117M172 , 110BM149 , 150"+S$+ 

T$+A$+R$+R$+I$+N$+G$ : DRAWBM145 , 

157"+J$+A$+C$+K$+SP$+W$+E$+B$+B$ 

740 CIRCLE (172, 120) ,13: SOUND 1,1 



2: SOUND 34, 4: SOUND 44, 2: FOR X=l 
TO 3 40: NEXT: SOUND 1,9: FOR X=l TO 
700: NEXT: SOUND 1,12: SOUND 34,4: 
SOUND 44,2: FOR X=l TO 3 40: NEXT :S 
OUND 1,9: SOUND 79, 12: GOTO 450 
750 GOSUB 830:DRAW"BM145,100C0"+ 
N3$+SP$+S$+T$+0$+0$+G$+E$+S$ : CIR 
CLE(153,130) ,10:CIRCLE(175,130) , 
10 : CIRCLE ( 197 , 130 ) , 10 : DRAWBM145 
,12 8R16":PAINT(14 6,12 6) ,0,0: CIRC 
LE(167,12 8) ,2:CIRCLE(168,125) ,2: 
CIRCLE (169, 122) , 2 : CIRCLE (183 , 128 
) ,2:CIRCLE(182,125) ,2 
760 CIRCLE(181,122) , 2 : PSET (153 , 1 
33) :PSET(175,133) : PSET (197 , 133) : 
PSET (149, 129) : PSET (157, 129) :PSET 
(171,129) :PSET(179,129) :PSET(193 
,129) :PSET(201,129) : DRAWBM140 , 1 
42E6BR13F3ND21E3BR16F4ND21E4BR15 
F3BM147 , 155"+M$ :DRAW M BM172 , 155"+ 
L$ : DRAWBM195 , 155"+C$ 
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770 DRAW"BM150,13 6R6BR16R6BR16R6 
780 SOUND 125, 6: SOUND 133,2:SOUN 
D 146,12:SOUND 146,4:SOUND 170,8 
: SOUND 159, 6: SOUND 14 6, 2: SOUND 1 
46, 4: SOUND 175, 5: FOR X=l TO 350: 
NEXT X: SOUND 159, 6: SOUND 14 6,2:S 
OUND 14 6, 4: SOUND 170, 5: FOR X=l T 
O 3 50: NEXT X: SOUND 159, 6: SOUND 1 
4 6, 2: SOUND 14 6,4 

790 SOUND 175, 5: FOR X=l TO 350 :N 
EXT X: SOUND 125, 6: SOUND 13 3, 2: SO 
UND 146, 12: SOUND 146, 4 .'SOUND 170 
,8:SOUND 159, 6: SOUND 146, 2: SOUND 
146, 4: SOUND 175, 5: FOR X=l TO 52 
5:NEXT X:PLAY"03T2V25L8EFAAAAGFD 
•': SOUND 89, 3: SOUND 109, 3: SOUND 1 
25, 3: SOUND 109,3 

800 FOR X=l TO 120: NEXT X: SOUND 
125, 3: SOUND 89,3: FOR X=l TO 200: 
NEXT X: SOUND 175, 2: GOTO 4 50 
810 GOSUB 830:PAINT(142,91) ,0,0: 
ZZ=0:GOTO 450 
820 GOSUB 8 30: GOTO 450 
830 LINE(140,90)-(208,160) ,PRESE 
T,BF:ZZ=1: RETURN 



/K\ 



March 1986 THE RAINBOW 



53 



\. 



N 



■% 

»* 






Kx>4r 



V) f 






V 



,•/ 



•A 



V 



w- 



* 4 



•l»/»N 




7 

f 



f •*•:•.■ 

MiH' 



EARS 





*. 



• 









VJ. 



«■■*■». 







W,** 



' -V 












,■» • • 



\ . 



/ 



% 



\ 






'/ 



Electronic Audio Recognition System 




EARS 



Electronic 
Audio 

Recognition 
System 



$99.95 



• SPEECH 
RECOGNITION 

• HANDS OFF 
PROGRAMMING 

•HIGH 
QUALITY 
SPEECH 
REPRODUCTION 

EARS Does It All! 



\^ ( 



c**°' 



\V& 



Two Years In (he Making. Speech Systems 
was formed to develop new and innova- 
tive speech products. After 2 years of in- 
tensive Research and Development, we 
have created a truely sophisticated 
speech recognition device. Recognition 
rates from 95% to 98% are typical. Until 
now, such a product was outside the 
price range of the personnel computer 
market, and even small businesses. 

EARS is trained by your voice and capable 
of recognizing any word or phrase. 
Training EARS to your particular voice 
print takes seconds. Up to 64 voice prints 
may be loaded into memory. You may 
then save on tape or disk as many as you 
like so that your total vocabulary is virtu- 
ally infinite. 

Speech and Sound Recognition. EARS is re- 
ally a sound recognition system, so it re- 
ally doesn't matter whether you speak in 
English, Spanish, or French. In fact you do 
not have to speak at all, you can train 
EARS to understand sounds such as a 
musical note or a door slamming. 

Hands Off Programming. Imagine writing 
your own BASIC programs without ever 
touching the keyboard. Everything that 




you would normally do through a 
keyboard can now be done by just 
speaking. 

Programming EARS Is Easy. LISTEN, 
MATCH and other commands have been 
added to BASIC so that programming 
EARS is a piece of cake! The single BASIC 
line: 10 LISTEN: MATCH will instruct 
EARS to listen to you and return the 
matching phrase. 

II Talks. EARS is also capable of high qual- 
ity speech. We mean REALLY high quality. 
The speech is a fixed vocabulary spoken 
by a professional announcer. Speech 
Systems is currently creating a library of 
thousands of high quality words and 
phrases. For a demonstration call (312) 
879-6844, you won't believe your ears or 
our EARS. 

DISK OWNERS. EARS will work with any 
disk system with either a MULTI-PAK or 
Y-CABLE. Our new Triple Y-CABLE was 
specifically developed for those wishing 
to add SUPER VOICE as a third device. 

You Get Everything You Need. You ge( ev- 
erything you need including a specially 
designed professional headset style noise 



cancelling microphone. The manual is 
easy to use and understand. Several 
demonstration examples are included so 
you don't have to write your own pro- 
grams unless you want to. EARS will work 
in any 32K or 64K Color Computer. 

SUPER VOICE $20 OFF 

Imagine talking to your computer and it 
talking back to you. When you need an 
unlimited vocabulary, you can't beat 
SUPER VOICE. For a limited time, we will 
give you the SUPER VOICE for $59.95 with 
your EARS purchase. Even if you already 
have another speech unit, here is your 
chance to buv the best and save $20. 

VOICE CONTROL 

Applications for EARS are astounding. 
Here is our first of many listening pro- 
grams to come. VOICE CONTROL is a 
program specifically designed to allow 
you to control any appliance in your 
house with your voice and our HOME 
COMMANDER (sold separately). For 
example, you can control your TV by 

saying "TV ON" or TV OFF". $24.95 
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Dealer Inquiries 
Invited 
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Speech S^ust 



We accept CASH, CHECK, COD, VISA and MASTER CARD orders. 

Shipping and handling US and Canada S3.00 

Shipping and handling outside the US and Canada $5.00 

COD charge $ 2.00 

Illinois residents add 6'/4% sales tax 



1 MEGABYTE 
COLORAMA 



em.5 



38W 255 DEERPATH ROAD 

BATAVIA, ILLINOIS 60510 

(312) 879-6880 (VOICE) 

(312) 879-6811 (24 HR. BBS) 



CALL ANY DAY TO ORDER. ALSO ORDER BY MAIL OF BBS. 



'SUPER VOICE' 



COCO'S MOST ADVANCED 
SPEECH SYNTHESIZER. 

IT TALKS, SINGS AND 

MORE. 

only ... $79.95 

WITH EARS OR PIANO 

KEYBOARD PURCHASE 

only . . . $59.95 



SUPER VOICE is no ordinary speech synthesizer. It uses Silicon 
Systems. Inc. SSI-263, the most advanced speech/sound chip 
available. SUPER VOICE is not only capable of highly intelligible 
speech, sound effects, and singing over a 6 octave range, but now 
we have turned SUPER VOICE into a monophonic Super Musio 
Synthesizer with our PIANO KEYBOARD. 

IT TALKS. A free TRANSLATOR text-to-speech program makes 
writing your own talking program as easy as SAYING "HELLO." 

SUPER VOICE works in any 32K or 64K computer. A disk system 
requires a Y-Cable or Multi-Pak. 

Here are the facts; 
the decision is yours. 






SUPER VOICE 


REAL TALKER 


RS SPEECH 
CARTRIDGE 


VOICE-PAK 


Synthesizer Device 


SSI-263 


SC-01 


SP-256 


SC-01 


Speaking Speeds 


16 


I 


1 


1 


Volume Levels 


16 


I 


1 


1 


Articulation Rales 


8 


1 


1 


1 


Vocal Trad 
Filler Sellings 


255 


I 


1 


1 


Basic unit 
ol Speech 


64 phonemes 
4 durations each 


64 phonemes 


64 allophones 
5 pause lengths 


64 phonemes 


Pilch Variations 


4096 |32 absolute levels 
with B inlleclion speeds) 


4 


1 


4 







FOOL'S CROSSING 



The world's first TALKING HI-RES GRAPHICS adventure. Finding 

the hidden treasure is the easy part, getting back home is another 

story. 

32K Disk $24.95 




SUPER TALKING HEADS 

When the SUPER VOICE speaks in a low pitched voice, the man 
speaks, when a high pitched voice is used the woman 
speaks $24.95 



N^V FRfE 

J\^ BLANK DISK 

^ OR TAPE 

^> WITH EVERY 

^7 ORDER 
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Dealer Inquiries 
Invited 



'/A 



We accept CASH. CHECK, COD, VISA and MASTER CARD orders. 

Shipping and handling US and Canada 13 .00 

Shipping and handling outside the US and Canada $5.00 

COD charge S2 .00 

Illinois residents add 6'A% sales tax 



Speech ^_)udt 



y 



em.3 



38W 255 DEERPATH ROAD 

BATAVIA, ILLINOIS 60510 

(312) 879-6880 (VOICE) 

(312) 879-6811 (24 HR. BBS) 

CALL ANY DAY TO ORDER. ALSO ORDER BY MAIL OR BBS. 
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COLORAMA 



'TALKING SOFTWARE' 

FOR THE VOICE, SUPER VOICE ™, RS SPEECH & SOUND PAK 



RADIO SHACK® 
SPEECH & SOUND TRANSLATOR 

We believe that no COCO speech 
synthesizer gives you the power 
and flexibility of the SUPER 
VOICE. Nevertheless, some have 
decided to go with the Radio 
Shack SPEECH & SOUND PAK. 
For those we've decided to open 
our TALKING LIBRARY by offer- 
ing the SPEECH & SOUND 
TRANSLATOR . Just load this pro- 
gram and our entire library is open to you. 

But that's not all. this program adds features. You get increas- 
ed intelligibility, the power of an exception table to specify 
specific pronunciations, $12.81 is spoken in dollars and cents, 
1,234,567 is spoken in millions, thousands, and hundreds, and 
much more. S24.95 




TERMTALK All the features of an intelligent telecom- 
munications program plus what appears on the TV is spoken. 

• Upload and Download programs • Control Xmit Protocols 

• Full or Split Screen • Buffer Editing 

• Normal or Reverse Video • It talks 

Please specify version (VOICE or RS SPEECH & SOUND PAK) 
Tape $39.95 Disk $49.95 

TALKING BINGO BINGO was never like this. The VOICE or 
SUPER VOICE makes all the calls while you sit back and play. 
Comes with 20 playing cards and 200 markers. High Resolu- 
tion graphic screen, 3 timing level, ball count and pause con- 
trol. $24.95 

ESTHER the talking psychoanalyst. An excellent example of 
artificial intelligence. She may not solve all your problems, but 
her insight will amaze you. Just like the original Eliza. $24.95 

SCORE E-Z A yahtzee type game. Up to six can play. $24.95 



CULT OF THE CAVE BEAR You're a stranded time 
traveler 50,000 years in the past. Can you fix your time 
machine while still surviving in this alien environ, and make it 
back? $29.95 

SHIP HUNT Play Battleship with your CoCo. All status 
reports are spoken. Ready battery, aim, fire at will! $24.95 

FINAL COUNTDOWN You must stop the mad general 
from launching a missile at Moscow and causing WW III. Has 
multiple voices for added realism, $24.95 



ADVENTURES 



STAR TALK You're the Star Fleet Captain. Your 
mission. ..destroy the enemies' Dragon Star Ships. All status 
reports are spoken! $24.95 

FOOL'S CROSSING The world's first TALKING HI-RES 
GRAPHICS adventure. Finding the hidden treasure is the easy part, 
getting back home is another story. $24.95 

ADVENTURE GENERATOR Create talking adventure 
games that are 100% Machine Language. Up to 99 rooms, 255 
objects, 70 command words and 255 conditional flags. 

64K Disk $39.95 



SUPER VOICE SONGBOOKS 



These two songbooks were specifically designed for the SUPER VOICE, the only speech synthesizer flexible enough to allow singing. 



VOLUME I (POTPOURRI) A collection of miscellaneous tunes 
for everyone. Songs include: How Much Is That Doggie in the Win- 
dow, Daisy, Aloha Oe, Old McDonald and more. $19.95 



VOLUME 2 (NURSERY RHYMES) Includes. Twinkle 
Twinkle Little Star, Mary Had A Little Lamb, 3 Blind Mice, the Alphabet 
Song and more. May be used with SUPER TALKING HEADS so 
they (Paul & Pauline) sing the songs. $19.95 



ANIMATED SENTENCES The child 
builds complete sentences from a graphic 
menu using keyboard or joystick. The action 
is then spoken and acted out graphically. It's 
a great way to learn the parts of speech (i.e. 
verb, subject, noun, etc.). $24.95 

KING AUTHOR'S TALES A creative 
writing tool to allow a child to write compos- 
itions, or short stories. O & A option is also 
included. $29.95 

COLOR MATH Addition, Subtraction, 
Multiplication, and Division are mastered. 
Student may specify difficulty level. $24.95 
SPELL-A-TRON Student builds a dictio- 
nary of words to be quizzed on. Perfect for 
Spelling B. $24.95 



EDUCATION 



SPELLING TESTER A graphic spelling 
game. The student is shown objects to be 
spelled. $9.95 

POETRY CREATOR The VOICE 
speech unit is used to speak poetry that is 
created. $9.95 

SHORT STORY MAKER A program 
to create and speak stories created by the 
child. $9.95 



'//' 



FOREIGN LANGUAGE Learn a 

foreign language. French dictionary is in- 
cluded. $9.95 

PRESIDENTS The student is able to 
master the Presidents of the U.S. S9.95 

STATES A program designed to aid the 
student in learning correct spelling of the 
states. $9.95 

CAPITALS Learning the State's Capitals 
is made more interesting using speech. 

$9.95 

HANGMAN A word guessing game. You 
must guess the word before you hang. $9.95 
MATH DRILL A program to help teach 
arithmetic. $9.95 



All software, except as noted, shipped on tape but may be moved to disk. 



SYMPHONY 12 

A 12 VOICE POLYPHONIC STEREO MUSIC SYNTHESIZER 



$79.95 $69.95 



WHEN PURCHASED 

WITH 

MUSICA2 



$59.95 



WHEN PURCHASED 

WITH THE 

PIANO KEYBOARD 



12 SIMULTANEOUS 
VOICES 

STEREO & MONO 

4 NOISE 
GENERATORS 

SOUND EFFECTS 

PLAYS AND CREATES 
MUSICA 2 FILES 



tWf&M 
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SUPER POLYPHONIC. Speech Systems is 
proud to bring you SYMPHONY 12, a poly- 
phonic 12 voice hardware stereo music synthe- 
sizer for the Color Computer. SYMPHONY 12 
also gives you 4 noise generators for percus- 
sion synthesis and sound effects. The PIANO 
KEYBOARD and MUSICA 2 (sold separately) 
turns your COCO into a real music machine 
with incredible flexibility. 

STEREO and MONO. By connecting SYM- 
PHONY 12 to your home stereo system, music 
is produced in stereo, 6 voices from each chan- 
nel. However, you don't need to have a stereo 
system, all 12 voices also come out of your TV 
or monitor. 

PICK AN INSTRUMENT. SYMPHONY 12 lets 
you choose from 10 preset instruments to syn- 
thesize chimes, violin, oboe, banjo, 
harpsichord, piano and more. You can even 
change instruments as the music plays. 

SOUND EFFECTS. SYMPHONY 12 is a sophisti- 
cated sound generator. 12 voices and 4 noise 
generators give you incredible sound effect 
capability. We have included gun shot, explo- 
sion, racing car and more. 



WATCH IT PLAY. As SYMPHONY 12 plays, a 
graphics display of a piano keyboard shows 
the notes playing. The display is entertaining 
as well as very educational. 

PLAY MUSICA 2 FILES. Thousands of MUSICA 
2 users will be excited to know SYMPHONY 
12 plays all music developed using MUSICA 2 
like you have never Seen or Heard it. In fact 
we highly recommend the use of MUSICA 2 
as a composition development tool for SYM- 
PHONY 12. Use MUSICA 2's superior graphics 
input capability and then play it through SYM- 
PHONY 12. You can also take advantage of 
our MUSIC LIBRARY series (sold separately! 
to give you access to over 500 music pieces 
representing 20 hours of music. 

ULTIMATE MUSIC DEVELOPMENT SYSTEM. 

SYMPHONY 12, MUSICA 2, and the PIANO 
KEYBOARD give you incredible flexibility. Im- 
agine sitting down at the PIANO KEYBOARD, 
playing a piece and recording it as you play 
just as you would to a tape recorder. Save your 
masterpiece and then using MUSICA 2 edit it 
if you like and print it. If you have a MIDI 
synthesizer, you can take the music and play 
it' using COCO MIDI (sold separately). Trv that 
on an IBM, APPLE, or COMMODORE (good 
luck). 



PIANO KEYBOARD. For those wishing to turn 
SYMPHONY 12 into a real polyphonic synthe- 
sizer we offer the extremely powerful and ver- 
satile PIANO KEYBOARD. The PIANO 
KEYBOARD was deisgned to be used in our 
entire music product line. You can use it with 
SYMPHONEY 12, MUSICA 2, SYNTHER 77 
PLUS, and even our advanced speech synthe- 
sizer, SUPER VOICE. 

When using MUSICA 2, you will be using 4 of 
the 12 voices available from SYMPHONY 12. 
To take advantage of the full 12 voice capability 
of SYMPHONY 12 you may use either the 
Color Computer's keyboard or the PIANO 
KEYBOARD. 

Y-CABLE or MULTI-PAK. Tape users using both 
SYMPHONY 12 and the PIANO KEYBOARD 
will require a Y-CABLE. Disk users will require 
the Triple Y-Cable or MULTI-PAK. 

SYMPHONY 12. You get over a dozen music 
and sound effect selections and complete 
documentation. Software is shipped on Tape 
or Disk. 

OPTIONS 

MUSIC LIBRARY (each volume) $29.95 

MUSICA 2 $29.95 

PIANO KEYBOARD Vh octave $79.95 

PIANO KEYBOARD 4 octave $119.95 
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We accept CASH, CHECK, COD, VISA and MASTER CARD orders. 

Shipping and handling US and Canada $3.00 

Shipping and handling outside the US and Canada $5.00 

COD charge $ 2.00 

Illinois residents add 6'A% sales tax 
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38W 255 DEERPATH ROAD 

BATAVIA, ILLINOIS 60510 

(312) 879-6880 (VOICE) 

(312) 879-6811 (24 HR. BBS) 

CALL ANY DAY TO ORDER. ALSO ORDER BY MAIL OR BBS. 



1 MEGABYTE 
COIORAMA 




-30*^ I lEO £*JQ QC 

PAK™ n^**-^ 



Plug this gem into your computer, connect to your home 
stereo system and sit back and enjoy music realism. The 
STEREO PAK is a hardware music synthesizer that plays 
our MUSIC LIBRARY series and MUSICA 2 music in stereo. 
Because it was designed specifically with music reproduc- 
tion in mind, the sound is superb. The highs are crisp 
and clear while the bass notes will rattle your walls. Inter- 
nally we use two high performance 8 bit digital to analog 
converters to assure fidelity. 

The STEREO PAK is all hardware. It is intended as an en- 
hancement for MUSICA 2 and our MUSIC LIBRARY series. 
Disk users will require our Y-CABLE or a MULTI-PAK. 
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coco 

MIDI™ 



$39.95 

Tape or Disk 



Now your COCO can talk to your MIDI music synthesizer. 
Whether you have a Korg, Roland, Casio, or Yamaha, it 
doesn't matter as long as it's MIDI equipped. 

COCO MIDI takes any MUSICA 2 music file and plays it 
through your music synthesizer. We offer you over 500 
tunes from our MUSIC LIBRARY series (sold separately) 
or create your own music using the best music composi- 
tion program available, MUSICA 2 (sold separately). 

COCO MIDI includes: documentation, plenty of music, 
and the cable to connect between the COCO and your 
synthesizer. 





MUSIC 
LIBRARY 



TM 



$29.95 

Tape or Disk 




The MUSIC LIBRARY series consists of 5 volumes: 100, 
200, 300, 400, and 500 each sold separately. Each contains 
over 100 four voice music selections with a playing time 
of over 3 hours each. The disk version is shipped on 5 
full disks. When coupled with the STEREO PAK, the music 
is reproduced with unsurpassed realism. 

A JUKEBOX program is included to allow you to select 
specific songs or automatically play each. These songs are 
ready to go, you don't need MUSICA 2 or a knowledge 
of music. MUSICA 2 users may customize each song. Re- 
quires minimum of 32K. 
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We put the PLUS in SYNTHER 77 PLUS by connecting our 
PIANO KEYBOARD so you can really play your COCO like 
a piano. 

You control vibrato pattern, Bender rate, Volume level as 
well as Attack, Decay, Sustain, and Release (ADSR en- 
velope). As you play you can record, then edit and save 
it to disk or tape. You can even fine tune it to match other 
instruments. 

The PIANO KEYBOARD is not necessary, you can use your 
COCO keyboard but the PIANO KEYBOARD makes your 
COCO a real music instrument. 



MUSIC LIBRARY 100 

Stage, Screen, & TV 
Music of the 70's 
Musicof the60's 
Musicofthe50's 
Old Time Favorites 

MUSIC LIBRARY 200 
MUSIC LIBRARY 300 
MUSIC LIBRARY 400 
MUSIC LIBRARY 500 



Classical 
Christmas (popular) 
Christmas (traditional) 
Patriotic 
Polka Party 

(another 100 selections) 
(another 100 selections) 
(another 100 selections) 
(another 100 selections) 
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Each volume sold separately, specify tape or disk. 
.C Write for complete list. 




It 



V 



ALL 500 $99.95 




* PIANO KEYBOARD -0 



Now you can really play your Color Computer and pick any or all 4 instruments: 
MUSICA 2, SYNTHER 77 PLUS, SUPER VOICE, and the ultimate SYMPHONY 12. 

MUSICA 2 users can use the PIANO KEYBOARD as an easy method to input music. 
Version 2.7 is required. Previous users may obtain an update by returning original 
tape or disk with $7.00. 

SYNTHER 77 PLUSturns your COCO into a music synthesizer without any additional 
hardware. You specify Vibrato, Bender, Volume, as well as Attack, Decay, Sustain, 
and Release (ADSR). 

SUPER VOICE, COCO's most advanced speech synthesizer becomes a music synthe- 
sizer when connected to the PIANO KEYBOARD. 

SYMPHONY 12 and the PIANO KEYBOARD gives you a professional 12 voice music 
synthesizer. 

These Piano Keyboards are not toys. They are the same style, shape, size, and feel 
as professional synthesizer keyboards. Disk owners must use a Y-CABLE or MULTI- 
PACK. 

2'A octave (32 note) $79.95 4 octave (49 note) $119.95 
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•When in stereo mode, music is 
played through our STEREO PAK 
(purchased separately). 

• Loudness of each voice may be 
individually specified. 

• Memory available is constantly 
displayed. 

• Voice waveshapes may be 
exchanged between voices at any 
point. 

• Tempo may be specified and may 
even be altered as the music plays. 

• Flats and sharps supported. 

• Billions of timbre combinations. 

■ High resolution graphic display, 
looks just like sheet music. 



• MUSICA 2 is 100% software, no need for 
hardware unless you want music produced in 
STEREO. In that case, the STEREO PAK may be 
purchased separately. It's a must for the 
audiophile! 

• Repeat bars allow repeating of music without 
re-inserting music a second or third time. 

• 30 page manual describes all. 

• Requires minimum of 64K 
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• Output music to your printer 
(Gemini I0X, Epson, R.S. printers). 




• Allows you to specify key signature. 

• Voice timbre (waveshape) may be 
altered by specifying harmonic 
content just like stops on an organ. 

• During editing, voice being inserted 
is displayed. 

• Each measure is numbered for easy 
reading of music. 

• Measure bars aid in reading and 
developing music. 

• Each voice may be visually 
highlighted for easy identification. 

• 4 Voices produced simultaneously. 

• Input notes from Coco keyboard, 
joystick, or Piano Keyboard. 



• Play music from your own BASIC program. 

• Block copy music for easy music development. 

• 100% machine language so it is lightning fast. 

• Vibrato effect easily produced. 

. With STEREO PAK, voices may be switched 
between left and right speakers as music plays. 

• Durations include: whole, half, quarter, 
eighth, sixteenth, thirty-second, sixty-fourth, 
and triplet. 



fl A MUSIC THEORY <l SI 

An advanced music course that covers Major and Harmonic Minor scales, interval spelling, Triad (Chord) theory. Inversions, Dominant 7th 
chords, and interval ear training. Format of the course includes drill and practice sessions, a scorecard to measure progress, graphics and sound 
output, and a reviewing session. 
32K Disk only $49.95 



'HOME COMMANDER' 

$59.95 



The HOME COMMANDER easily connects lo the 
cassette port of your Color Computer and lets you 
control appliances in your home. 

NO WIRES NECESSARY 

The HOME COMMANDER uses your home's 
existing electrical wiring to control virtually any- 
thing. Appliances are controlled via small control 
modules available at your local SEARS or Radio 
Shack store. 

ON FRIDAY 7:42 PM, OFF 
SUNDAY 1:26 AM 

Included FREE is a program to allow you to control 
up to 256 devices and specify the time and date 
they are to be activated. That's right, the software 
has its own built in accurate clock. 





Imagine controlling a light or TV with your voice. 
When used with our Electronic Audio Recognition 
System, EARS, you can literally control any 
appliance. 

PLUG'N POWER USERS 

If you were disappointed in the software that 
came with the Radio Shack PLUG'N POWER unit, 
and you probably were, we'll offer you our pow- 
erful software separately. An early version is de- 
scribed in the Feb., April, )une, and August 1983 
issues of RAINBOW. Our current version is even 

better $1 9.95 

PLUG'N POWER is a trademark of Radio Shack* 



PRECISION TIME MODULE $59.95 



INCLUDES OS9 DRIVER — 





Now your computer will always know the correct 
time and date. This amazing precision time mod- 
ule is calibrated to the National Bureau of Stan- 
dards (WWV) atomic clock and you should never 
have to change it. 

Use the PRECISION TIME MODULE to add the 
time element to your games or use on BBS. If you 
like, purchase separately our BBS. 
COLORAMA BBS (64 K, 1 drive minimum) $99.95 

BATTERY BACKUP 

Even when your computer is off, the clock 
keeps correct time by operating using the 
internal battery backup system. 
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MONTHS, LEAP YEARS & DST 

The PRECISON TIME MODULE automatically 
adjusts for the different number of days in 
each month as well as leap years. And believe 
it or not. it adjusts for DST so you don't have to 
remember if it's SPRING FORWARD or FALL 
FORWARD. 




Y-CABLE $28.95 TRIPLE Y $34.95 

Why pay S100 to $200 for a multi-pak. With We developed the Triple Y-Cable specifically 

the Y-CABLE, you can connect your disk for those interested in both speech synthesis 

system to your computer along with either and speech recognition. The Triple Y-Cable 

our STEREO PAK music synthesizer, our lets you connect EARS and SUPER VOICE to 

VOICE, SUPER VOICE speech synthesizers, your color computer along with your disk * 

or our PRECISION TIME MODULE. All con- system. '"*^T 

nectors gold plated. _J 

, Need an 

^ATTENTION EXPERIMENTERS! «•« $2900 

Interested in building your own project? Disks (any quantity) SI. 49 

Our oversized board gives plenty of room Tape C-10, C-20 SO. 69 

for construction while the sturdy aluminum Hard TaDe Box SO 29 

,. . . Speech r ' 

case with black satin finish assures protec- 6821 S2.95 

tion and a professional appearance. ssi-263 74 LSI 38 SO. 79 

Prototype Board only $19.95 mM 7407 S0,79 

Prototype Enclosure only $19.95 IC sockets 14, 16, 22 pin SO. 29 

Buy both for $29.95 IC sockets 24, 28, 40 S0.39 
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We accept CASH, CHECK, COD, VISA and MASTER CARD orders. 

Shipping and handling US and Canada $3.00 

Shipping and handling outside the US and Canada S 5.00 

COD charge S2.00 

Illinois residents add 6'A% sales tax 
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38W255 DEERPATH ROAD 
BATAVIA, ILLINOIS 60510 
(312) 879-6880 (VOICE) 
.coloSa B m T a E (312) 879-6811 (24 HR. BBS) 

CALL ANY DAY TO ORDER. ALSO ORDER BY MAIL OR BBS. 



TURN OF THE SCREW 



The third installment of the "beginner's hardware course" 



An Introduction 



to Timing 



By Tony DiStefano 
Rainbow Contributing Editor 



Continuing our journey into the 
CoCo, this month 1 will look 
into the heart of this and any 
computer — timing. All the hardware 
of the computer is controlled by timing. 
The most important part of the timing 
is to keep the CPU in step. What is a 
CPU, anyway? Well, the letters CPU 
stand for Central Processing Unit. The 
CPU inside -the CoCo is the MC6809. 
The CPU, in a way, does all the work. 
It can move data from one part of 
memory to another, compare two 
values and act according to the result, 
add and subtract values and so forth. In 
fact, without the CPU, the rest of the 
hardware that makes up a computer 
would be worthless. The CPU is a very 
complex chip. It has data lines, address 
lines, interrupt lines, status lines and 
more. The timing that goes with the 
CPU is also important. OK, let's get 
into it. It is a prerequisite to understand- 
ing how a CPU works. 

Up till now, when I talked about 
zeros and olies and the change from one 



Tony DiStefano is well-known as an 
early specialist in computer hardware 
projects. He lives in Laval Ouest, Que- 
bec. 



to the other, it was considered to be 
instantaneous. There was no mention of 
how long it took to change from one 
state to another. In fact, we are dealing 
with real life, not just theory. Situations 
in theory rarely work in real life the way 



""The first fact of the 
real world is 
propagational delay. ' 



you want or expect them to. Welcome 
to the real world of delays. Ever caught 
an on-time airline flight? Ha! 

The first fact of the real world is 
propagational delay. Take, for instance, 
a simple inverter. Figure la shows an 
inverter. When there is a Tat the input 
there is a '0' at the output. A '0' input 
will give a ' 1' output. But when the input 
changes from one state to another, there 
is a short delay before the output 



changes. This delay is called the prop- 
agational delay, which means the 
amount of time it takes an electrical 
signal to go through a logic element or 
wire. 

Figure lb shows a graph of the input 
and the output of an inverter. The X- 
axis (from left to right) shows the 
passing of time. This can be in seconds, 
hundredths of seconds, thousandths of 
seconds and even millionths of seconds. 
When no time base is given, then time 
factor is not relevant. Typical delay 
times for the TTL family (more on chip 
families in later articles) is from five to 
30 ns (ns = nanoseconds). The Y-axis 
usually shows the binary level of '0' and 
' I '. When two or more signals are shown 
that are related to each other, they are 
shown on top of each other with the left- 
to-right passing of time common to 
each. 

Getting back to Figure lb, we see the 
passing of time and the relation of the 
input to the output. There is no delay 
shown in this diagram. To show the 
delays of each signal for a given com- 
plex gate would confuse the diagram. 
Instead, an overall delay is given for the 
gate. But, in order to get used to the idea 
of delays, Figure lc shows the time 
delays of a typical inverter. Along with 
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Figure la 



Figure lb 



Figure lc 
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the delay of the signal there is also the 
rise and fall time. The rise time of a 
signal is described as the time it takes 
for a given signal to reach 90 percent of 
maximum voltage from the 10 percent 
voltage level. The fall time of a signal 
is described as the time it takes for a 
given signal to drop to 10 percent 
voltage from the 90 percent voltage 
level. In the case of the CoCo, the 
voltage considered a logical level of T 
(or HI) is five volts. The logical level '0' 
(or LO) is, of course, zero volts. The 
actual working voltages may be slightly 
different. 

Delay, rise and fall times are impor- 
tant mainly to the designer of the 
system. When an engineer designs a 
computer he must know these timings 
and make sure that all operations are 
within the given limits. For example, 
two signals go to one gate, but one goes 
through several gates first. Each time 
the signal travels from one gate to 
another there is more delay. If the signal 
is delayed enough, an improper signal 
output results. 

It sounds like I'm making a big deal 
of delays. While it is important, it is not 
a major concern to computer hackers 
(or should I use the term hobbyist?) and 
even less to end users. More important 
to us is another kind of delay. It is 
known as "access time," which means 
the mean time between the request for 
memory and the actual valid data. 

Let us look at a typical memory chip. 
There are thousands of gates and tran- 
sistors inside this chip. All of these gates 



inside the chip cause a significant delay 
between the time when the address to 
the chip is valid and the time when the 
data output appears on the data bus. 
This is known as access time. When 
talking about memory, an important 
parameter is access time. These access 
times can range from super-fast static 
memory at about 10 ns to very slow 
dynamic memory at 450 ns and slower. 
It is this limitation that controls and 



"More important to us 
is another kind of 
delay. It is known as 
'access time,' which 
means the mean time 
between the request for 
memory and the actual 
valid data. " 



limits the speed of CPUs. Figure 2a 
shows the read cycle timing diagram of 
a memory chip. Figure 2b shows the 
write cycle for the same chip. What 
follows is a description of what each line 
on the diagram means. 

Address — These are the address lines 
that select what byte is to be accessed. 
It is shown with two lines, one high and 
one low. It is shown this way because 
there are usually several lines and since 
the timing is the same no matter what 



byte you access, it is not relevant which 
address line is high or which line is low. 
The two lines (one on top and one on 
the bottom) represent any given address 
within the chip. Where the lines criss- 
cross means a change of address. That 
is when the CPU is finished with that 
byte and requests another by putting 
another address on the bus. Access 
times are always measured with respect 
to the address change from the CPU. 
Actually, it starts when the address is 
stable, better known as a "valid ad- 
dress." 

Chip Select (CS) — Remember the *CS 
line on memory chips in past articles? 
It is used to select or activate the chip. 
From the diagram of the read cycle, we 
can now see the relation between when 
the address is valid, the *CS line and 
when the data is valid. 

Data out — This, of course, is the data 
that the CPU requested. Notice the data 
valid area. That is the time when the 
data that appears on the bus is the data 
that is held in that memory location. 
Notice the top and bottom dual line 
display. It has the same description as 
address lines, some are ones and some 
are zeros. The line in front of the data 
valid section is halfway between zero 
and one. That means the data lines are 
tri-state and no valid data is input or 
output. The shaded area on both sides 
of the data valid window is the transi- 
tion time between tri-state and data 
valid. In this area, data lines are chang- 
ing to their proper values. A read in this 
area will not yield valid data. 



March 1986 THE RAINBOW 



63 



ADDRESS 



Figure 2a 
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Read/ Write — The *R/W line is used 
to select a read cycle or a write cycle. 
Straightforward, no problems there. In 
the CoCo this line is logical T to read 
and '0' to write. 

The following is a description of all 
the relevant parameters used in Figures 
2a and 2b. 

t(rc) — Read Cycle Time: the time it 
takes for a complete read cycle given in 
ns. 

t(a) — Access Time: the delay between 
a valid address and data valid. 

t(co) — Chip Select to Output Valid: the 
delay between when the *CS is active 
and the data is valid. This is only true 
with a valid and stable address. 

t(cx) — Chip Select to Output Active: 
same as t(co) but not to data valid; to 
when the data lines start changing from 
tri-state to output. Usually of minor 
importance. 

t(otd) — Output Tri-state from Deselec- 
tion: the time that the data stays valid 
after the *CE goes inactive or deselects. 

t(oha) — Output Hold from Address 
Change: the time that the data stays 
valid after an address change is de- 
tected. 

t(wc) — Write Cycle Time: same as the 
t(rc) except for a write cycle. 



t(w) — Write Time: the minimum time 
the write line has to remain low. 

t(wr) -- Write Release Time: time 
between the *WE line deselects and a 
change of address. 

t(otw) — Output Tri-state from Write: 
the time it takes the data lines to go to 
tri-state from a write request. 

t(dw) — Data to Write Time Overlap: 
the time data must be stable before the 
*WE line deselescts. 

t(dh) — Data Hold from Write Time: 
the time data must be stable after the 
*WE line deselects. 

Figures 2a and 2b show the read and 
write cycle paramaters for a typical 
memory chip. Though these are not the 
memory chips inside the CoCo, the 
timing and paramaters are quite similar. 

Now with no further delays, it is time 
to look into the CPU . . . well, sort of! 
There is one more thing we must look 
into; it is CPU related, though. Wc are 
getting closer. It is the master clock, 
which is a master reference wave form 
used to synchronize all of the logic in 
a system. 

The master clock is usually the high- 
est frequency in the computer. All other 
timings are derived (divided) from this 
clock. The CPU clock is the speed or 
frequency at which all instructions and 
data are retrieved and stored to mem- 



ory. Depending on the system design, 
the CPU clock can be equal to the 
master clock, or any division thereof. In 
the case of the CoCo, the master clock 
frequency is 14.31818 MHz (mega-hertz 
or million hertz) and the CPU clock 
frequency is 1/16 that of the master 
clock at 0.8948 MHz. Well, there are 
two clock speeds in the CoCo. Under 
special conditions, the CPU can work 
at 1.8 MHz. 

Now you might say, "Wow, my CoC( 
has a clock rate of only .894 MHz!' 
Compared to that of the 4 M Hz of othe 
computers, that may or may not bi 
slower. You see, it gets more compli 
cated. The CPU clock does not alway: 
mean the net speed of the computer 
There are some other factors involved 
such as synchronous I/O, as opposed u 
asynchronous I/O. 

Let's look at synchronous I/O first. 
As the word implies, synchronous I/O 
means that any memory, read or write, 
is synchronized. Synchronized to what? 
The CPU clock, of course. On any given 
clock cycle, the CPU can do one I/O. 
You know exactly when the CPU will 
need the bus. It corresponds to the clock 
cycle. In an asynchronous situation, the 
CPU requires more than one clock cycle 
to do a read or write. Asynchronous 1/ 
O requires either three or four cycles 
depending on what kind of I/O it is 
doing. On this type of CPU, signals are 
required to tell memory or other devices 
that an I/O has started. 

Just about now, a little bit of math 
is required. Given that the clock fre- 
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quency of the CoCo is 894886 hertz or 
0.894 MHz, one clock cycle is 1117 
nanoseconds. The way I did this is to 
transfer from frequency to time period. 
The equation used is: 

T= 1/F 

where "T is in seconds and 'F' (fre- 
quency) is in hertz. So the frequency of 
0.894 MHz is a time period of 
.000001117 seconds, or 1117 nanosec- 
onds, or I.I 17 microseconds. Now, 
when we talk about speed, we can say 
that the CoCo can do about one I / O per 
microsecond — a much more accurate 
way to measure the effective speed of a 
CPU. 

I hope these articles about the hard- 
ware of the CoCo are informative to 
you. Also, 1 hope I am not going too 
fast; it is hard for me to judge what 
audience I am writing for. If you have 
some comments to make, a direction to 
take or something you don't under- 
stand, write to me through RAINBOW 
and I'll try to answer the interesting and 
common ones here in this column. Next 
time, we'll look deeper into the heart of 
the CoCo. "^ 
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everyone except those whose subscriptions are 
through our distributor in Australia. 







w Software 
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'KEEP-TRAK' General Ledger Reg. $69.95— ONLY $24.95 

"Double-Entry" General Ltdoer Accounting Syttam tor home or business: 16k, 
32k, 64k. User-friendly, menu-driven. Program features balance sheet, income & 
expense statement (current & VTD), journal, ledger, 899 accounts & 2350 entries 
on 32k 4 64k (710 accounts 6. entries on 16k) (disk only). Version 1.2 has screen 
printouts. Rainbow Reviews 1.1 - 9/84 : 1 2-4/85 

"OMEGA FILE" Reg. $69.95-ONLY $19.95 
Filing data base. File any information with Omega File. Records can have up to 16 
fields with 255 characters per field (4080 characters/record). Sort, match & print 
any field. User friendly menu driven. Manual included (32k/64k disk only). 
Rainbow Review 3/85, Hot CoCo 10/85 
BOB'S MAGIC GRAPHIC MACHINE 
Can generate BASIC code to use in your programs. Easy drawing and manip- 
ulation of circles, ellpses, boxes, lines and ARCS. Single joystick operation with on 
line HELPS at all times. Allows text on the graphics screen & movement ol obiects 
on (he screen. Can be used as a stand-alone graphics editor. Instruction Manual. 
GRAPHICS EDITOR. R.g. $39.95— ONLY $19.95 for disk or tape. 64k ECB. 
Rainbow Review 7/85, Hot CoCo 9/85 "The graphics bargain of the year" 

'KEEP-TRAK' Accounts Receivable. (Avail io/oi/85). 

Features: auto interest calculation, auto ageing of accounts, installment sales, 
total due sales, explanation space as long as you need, detailed statements, 'KEEP- 
TRAK' General Ledger tie in, account number checking, credit limit checking & 
more. User friendly/menu driven. Includes manual. $39.95 or $49.95 General 
Ledger & Accounts Receivables. (Olsk Only). 

OS9 UTILITY DISK 
Contains: Transler utilities between RSDos and OS9 which also allows manipula- 
tion of RS files with OS9 programs. EXPANDABLE MULTILEVEL HELP. 
CPTREE — copies directory structures with no temp, files. Two calculators, plus 
ten other utilities. $19.95 (Disk Only— Available 10/15/85) OS9 is Microware TM. 

'COCO WINDOWS' Available 10/31/85 
With hl-res character display and window generator. Features an enhanced key 
board (klicks) and 10 programmable function keys. Allows the user to create 
multiple windows from basic. Includes menu driven printer setup and auto line 
numbering. Four function calculator, with memory. The above options can be 
called anytime while running or writing in BASIC. APPLE PULL YOUR DRAPES, 
YOU DON'T WANT TO SEE THIS $19.95 (disk or tape) includes manual. 

THE OTHER GUY'S SOFTw.ro (Add $2.50 for POltlgi 5 handll.io,' 

P.O. Box H, 55 N. Main C.O.D., Money Order, Check In U.8. Funds 

Logan, UT 84321 (801) 753-7820 (Pleat* ipeclly If J*M controller) 
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Block! Kick! Duck! No, it's not a 
game of football, but a rollicking 
session of. . . 




4^un£ t u 
Fighting 



0y J,arry Woleotf 



"W"^all started when I walked into 
I Tthe local arcade to find the latest 
-A. wgame surrounded by crowds of 
people. As 1 pushed my way through to 
see what it was, I heard people excitedly 
yelling, "Block! kick!" This got me 
working day and night, trying many 
different approaches to my program, 
Kung Fit Fighter. 

Here's the game setting: You are the 
man on the left of the screen. As soon 
as the game board appears, the oppo- 
nent charges from the right. You must 
defend yourself against the enemy with 
your deadly kicks and punches, while at 
the same time duck and block your 



Larry Wolcolt has owned a Co Co for 
about four years. He is a self-taught 
programmer. He attends Daniel Webs- 
ter Junior High School in Milwaukee, 
Wisconsin and enjoys computers and 
electronics. 



opponent's assaults. The controls work 


like this: 




Right arrow 


— kick 


Left arrow 


— punch 


Up arrow 


— block 


Down arrow 


— duck 


'Q' key 


— move left 


'@' key 


— move right 



After striking your opponent 20 
times, he falls and your score, level and 
energy points are displayed; the higher 
the level, the less the time interval 
between your opponent's kicks and 
punches, and he will be able to duck and 
block your assaults more often. When 
your energy points run out, so does your 
life. 

1 have used the keyboard PEEKs 
instead of the slow INKEY command to 
speed the program — this makes auto 
kicking, punching, etc. I have also used 
the POKE 65495,0 to speed the pro- 
gram. If your computer can't handle it, 



just delete it from the program. 

The score is increased by five points 
every time you punch your enemy, and 
10 points every time you kick him. 
Energy points decrease when you are 
struck by your opponent (vou start with 
25). 

After loading Kung Fu Fighter, run 
it until it gets to the title screen, then 
press BREAK and run it again. This only 
has to be done once, right after loading 
(because once in a while, the GETs do 
not "get"). The program is compiled in 
this order: 



Lines 


Function 


0-70 


Set variables 


230-670 


DRAW and GET figures 


680-840 


Draw title screens 


890-990 


Check keyboard for keys 




pressed 


1000-1900 


Kick, punch, duck, walk 




and block subroutines 


1950-2110 


End of game titles □ 
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The listing: KUNG FU 



( 270 .. . 


....61 


460 ... 


...204 


630 ... 


...200 


780 ... 


...152 


980 ... 


...31 


1180 .. 


....25 


1380 ... 


...220 


1630 .. 


...158 


1830 .. 


....24 


1990 .. 


...223 


END 


228 





kung-fu 
fighter 

LARRY WOLCOTT 

1985-VERSION 1.1 



PORK N 1 BEAN 
SOFT-WARE 



HS=750 

10 A=0:A1=0 

20 POKE 65495, 

30 L=l 

4J3 X=20:Y=107:X1=232:Y1=107 

50 I=.l 

60 U=8 

70 B=1:B1=1 

80 ' 

90 ' 

Ij3j3 ' 

11^5 ' 

120 » 

130 ' 

14/3 ' BY: 

150 ' 

160 ' (C) 

170 ' 

180 ' 

190 ■ 

200 ' 

210 ' 

220 ' 

2 30 DIMM (8,8): DIMBL (8,8): DIMBR ( 8 



240 DIML(8,8) :DIMSR(8,8) :DIMSL(8 

,8) 

250 DIMR(8,8) :DIMKR(8,8) :DIMKL(8 

,8) 

2 60 DG=2 5 

270 DIMRT(8,8) :DIMLT(8,8) :DIMDR( 

8,8) :DIMDL(8,8) 

2 80 CLS 

2 90 PCLS 

300 DRAW"BM20,4R1D2L2U2R1L1D2R1D 

2G2H2F2E2F2E2G2H2D6G4D2L2R2U2E4F 

4D2R2" 

310 GET(12,4)-(28,20) ,M 

320 PCLS 

330 DRAW "BM20,4R1D2L2U2R1L1D2R1 

D2F2R2L6E2D6G4F2H2E4F4D2R2" 

340 GET(12,4)-(28,20) ,R 

350 PCLS: DRAW "BM20 , 4R1D2L2U2R1L 

1D2R1D2F2L6R2E2D6G4D2L2R2U2E4F4G 

2" 

360 GET(12,4)-(28,20) ,L 

370 PCLS 

380 DRAW "BM20,4R1D2L2U2R1L1D2R1 

D2G2F2H2E2D8D4R2" 



390 GET(12,4)-(28,20) , RT 

400 PCLS 

410 DRAW "BM20,4R1D2L2U2R1L1D2R1 

D2F2G2E2H2D12L2" 

420 GET(12,4)-(28,20) , LT 

430 PCLS 

440 DRAW "BM20,4R1D2L2U2R1L1D2R1 

D2R8L8G3R4L4E3D6F4D2R2L2U2H4G4D2 

R2" 

450 GET(12,4)-(28,20) ,SR 

4 60 PCLS 

470 DRAW "BM20,4R1D2L2U2R1L1D2R1 




D2L8R8F3L4R4H3D6G4D2L2R2U2E4F4D2 

L2" 

480 GET(12,4)-(28,20) ,SL 

4 90 PCLS 

500 DRAW "BM20,4R1D2L2U2R1L1D2R1 

D2R4L4G4R4L3E3D6R2E2R2E2U2D2G2L2 

G2L2G4D1R2" 

510 GET(12,4)-(28,20) ,KR 

520 PCLS 

530 DRAW "BM20,4R1D2L2U2R1L1D2R2 

D2L4R4F3L4R4H3D6L2H2L2H2U2D2F2R2 

F2R2F4D1L2" 

540 GET(12,4)-(28,20) ,KL 

550 PCLS 

560 DRAW M BM20,4R1D2L2U2R1L1D2R1 

D2L4D2U2R4F3L6D2U2R6H3D6G4D2L2R2 

U2E4F4D2L2" 

570 GET(12,4)-(28,20) ,BL 

580 PCLS 

590 DRAW "BM20,4R1D2L2U2R1L1D2R1 

D2R4D2U2L4G3R6D2U2L6E3D6F4D2R2L2 

U2H4G4D2R2" 

600 GET(12,4)-(28,20) , BR 

610 PCLS 

620 DRAW "BM20,12R4U1R2D2L2U1L2D 

4U4L2D2G4D2R2L2U2E4F4D2R2" 

630 GET(12,4)-(28,20) ,DR 

640 PCLS 

650 DRAW "BM20,12L4U1L2D2R2U1R2D 

4U4R2D2G4D2L2R2U2E4F4D2L2" 

660 GET(12,4)-(28,20) ,DL 

670 PCLS 
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680 PM0DE4,1:PCLS:SCREEN1,1 

690 LINE(4,4)-(252,188) ,PSET,B 

700 DRAW "BM72,16R8D8R4U4E4R8G4D 

4G4R4D4R4D4R4D8L8U4L4U4L4U4L4D12 

L8U28BR28R8D8F4D12U12E4U8R8D12G4 

D8G4L8H4U8H4U12BR28" 

710 DRAW "R12F8U8R8D28L8U8H12D12 

G4D4L8U8E4U16BR3 2BR4G4D20F4R16E4 

U12L12D8R4G4L4H4U12E4R8F4R4U4H4L 

16G4" 

720 DRAW "BM100,52R20F4D8L4H4L8D 

8R8D8L12D4L8U12E4U12BR28R8D8F4D1 

2U12E4U8R8D12G4D8G4L8H4U8H4U12" : 

PAINT(76,20) , 5:PAINT(152,20) ,5:P 

AINT(104,20) ,5:PAINT(180,20) ,5:P 

AINT(104,56) ,5 

730 PAINT (132, 56) , 5 : PMODE 4,1:SC 

REEN1,1 

740 PLAY "V31;01;T5;L5;1;1;1;L2; 

1 ; L5 ; 3 ; P3 ; 3 ; L2 ; 3 ; P4 ; L5 ; 2 ; 2 ; P3 ; L5 

•1*2" 

750 CLS : PRINT : PRINT ************ 

a*******************" 

760 PRINT: PRINT " kung-fu 

fighter " 

770 PRINT: PRINT " BY: LARRY 

WOLCOTT" 
780 PRINT " VERSION 1.1" 



(C)1985 n 

PORK N 



BASIC COMPILER 

WASATCHWARE belie* cs thai users of i he Color Computer desme the 
fifihl 10 use all 64k of HAM that is mailable In Ihc computer, anil hate fasl 
machine l»nj>uaRf programs itint use ihr full potential of ihc fiHUf microprocessor. 
Thai h wh> ihc BASK compiler, called Ml. BASIC was developed. Here are Mime 
of Ihc reasons lhat make this compiler ORC of Ihc hc\l bargains In tills nuca/ino: 

- I'rograms can use all Mk of HAM fur cither program storage 
or fur large numbers of tariablcs and arra>s like A) 2001)01 

• Full I'loating I'oinl arilbmclic expressions with functions 

- M HHOI riNK and (AM. commands allows for struclurcd 
programming and more independent program development 

• I ill' sequential and direct access disk files allowed 

- MASK source and M.I.. output I/O lo disk, lape or mctunr) 





COMMANDS SUPPORTED 






1. 


I/O -Commands 












CLOSE CLOADM 


CSAVEM 


DIR 


DRIVE 


DSKIS 




DSKOS FIELD 


FILES 


GET 


INPUT 


KILL 




LSET OPEN 


PRINT 


PUT 


RSET 




?. 


PrORrara Control Commands 










CALL END 


EXEC 


FOR 


STEP 


NEXT 




GOSUB GOTO 


IF 


THEN 


ELSE 


ERROR 




ON. .GO RETURN 


STOP 


SUBROUTINE 




3. 


Math Functions 












ABS ASC 


ATN 


COS 


CYH 


EOF 




EXP FIX 


INSTR 


INT 


LEN 


LOG 




LOC LOF 


PEEK 


POINT 


PPOINT 


RND 




SGN SIN 


SQP 


TAN 


TIMER 


VAL 


4. 


String Functions 












CHRS INKEYS 


LETTS 


MIDS 


MKNS 


RIGHT 




STRS STRINGS 











5. Graphic/Sound Commands 



COLOR CLS 


CIRCLE 


DRAW 


LINE 


PAINT 


PCLEAR PCLS 


PLAY 


PMODE 


PRESET 


PSET 


RESET SCREEN 


SET 


SOUND 






6. Other/Special Com 


innda 








DATA DIM 


LLIST 


MOTOR 


POKE 


READ 


REN RESTORE 


RUN 


TAB 


VERIFY 


DLD 


DST IBSHFT 


LREG 


PCOPY 


PMODD 


PTV 


REAL SREG 


SUP 


VECTD 


VECTI 





Tape- $69.95 /f^tt 

Both"- lil.U MhHK0,,KK " sp Wasatch Ware 

,„_,,. 7350 Nutree Orive 

Add $4.00 Postage and Handling Salt ^^ c , ty< , Jt; . h 

Send checK or Money order. 84121 

No C.O.D.. Utah res. add 5% tax. Call (ROD 943-6263 



SOFTWARE" 
PRESS 



790 PRINT » 

800 PRINT: PRINT " 

1 BEAN " 

810 PRINT " 

820 PRINT: PRINT " 

ANY KEY" 

830 PRINT: PRINT "*************** 

840 I$=INKEY$ : SCREEN0 , 1 : IFI$=" "T 

HEN 840 

850 PCLS 

860 LINE(4,4)-(252,188) ,PSET,B 

870 LINE(4, 124)-(252, 124) , PSET 

880 DRAW"BM4,84E12R8E4R12F8R8E4R 

4E4R8F16R20E16R8U4R8E4R12F8R16F8 

R20F8R16R4R8F4" 

890 PM0DE4,1:SCREEN1,1 

900 I$=INKEY$ 

910 IFPEEK(344)=247THENGOSUB1050 

920 IFPEEK(343)=247THENGOSUB1260 

9 30 IFPEEK(342)=247THENGOSUB1440 

940 IFPEEK(341)=247THENA=3 

950 IFPEEK(339)=251THENGOSUB1560 

960 IFPEEK(338)=254THENGOSUB1500 

970 IFA=4THENPUT(X-8,Y)-(X+8,Y+1 

6),DR ELSE IFA=3THENPUT(X-8,Y)-( 

X+8,Y+16),BR ELSEPUT(X-8,Y)-(X+8 

,Y+16) ,R 

980 IFAl=4THENPUT(Xl-8,Yl)-(Xl+8 

,Y1+16),DL ELSE IFA1=3 THENPUT(X 

1-8,Y1)-(X1+8,Y1+16) ,BL ELSE PUT 

(X1-8,Y1)-(X1+8,Y1+16) ,L 

990 IFX1>X+18THENGOSUB1630 

1000 IFXKX THENGOSUB1690 

1010 C=C+I:IFO1THENC=0:GOSUB175 



1020 IF H>20 THEN 1890 

1030 IF DG<0 THEN 2030 

1040 GOTO 900 

1050 IFRND(10)>=U THEN Al=4 

1060 IF XKX+10 THEN 1070 ELSE 1 

150 

1070 A=0:IF A1=4THEN1150 

1080 LINE(X-8,Y)-(X+8,Y+16) , PRES 

ET,BF 

1090 PUT(X-8,Y)-(X+8,Y+16) ,KR 

1100 PLAY"T255 ; V31 ; 12 ; 12 ; 12 ; 12 ; 1 

2" 

1110 LINE(X-8,Y)-(X+8,Y+16) , PRES 

ET,BF 

1120 SC=SC+10:H=H+1 

1130 A=0 

1140 RETURN 

1150 LINE (X-8,Y) - (X+8,Y+16) , PRES 

ET,BF 

1160 LINE(X1-8,Y1)-(X1+8,Y1+16) , 

PRESET, BF 

1170 put(xi-8,yi)-(xi+8,yi+i6) ,D 

L 
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PUT(X-8,Y)-(X+8,Y+16) , KR 
PUT(X1-8,Y1)-(X1+8,Y1+16) ,D 



PLAY"T255 ; V31 ; 1 ; 1 ; 1 ; 1" 
LINE(X-8,Y)-(X+8,Y+16) 



PRES 



1180 
1190 

L 

1200 

1210 

ET,BF 

1220 LINE(X1-8,Y1)-(X1+8,Y1+16) , 

PRESET, BF 

12 3)3 A1=0 
A=0 

RETURN 

IFRND(10)>U THEN13 60 
IF Al=3 OR A1=4THEN1360 
IFXKX+10THEN1290ELSE13 60 
LINE(X-8,Y)-(X+8,Y+16) , PRES 



1240 
1250 
1260 
1270 
1280 
1290 



ET,BF 

1300 PUT(X-8,Y)-(X+8,Y+16) ,SR 

1310 PLAY"T255;V31;12;12;12;12" 

1320 LINE(X-8,Y)-(X+8,Y+16) , PRES 

ET,BF 

133JZ5 SC=SC+5:H=H+1 

1340 A=0 

1350 RETURN 

1360 LINE(X1-8,Y1)-(X1+8,Y1+16) , 

PRESET, BF 

1370 LINE(X-8,Y)-(X+8,Y+16) , PRES 

ET,BF 

1380 PUT(X-8,Y)-(X+8,Y+16) ,SR 



1390 PUT(X1-8,Y1)-(X1+8,Y1+16) ,B 

L 

1400 PLAY "T255;" 

1410 LINE(X-8,Y) 

ET,BF 

14 20 A=0 

1430 RETURN 

1440 A=4 

1450 PUT(X-8,Y)- 

1460 PUT(X-8,Y)- 

1470 LINE(X-8,Y) 

ET,BF 

1480 A=4 

1490 RETURN 

1500 A=0:LINE(X- 

PRESET,BF 

1510 X=X+2 

1520 PUT(X-8,Y)- 

1530 LINE(X-8,Y) 

ET,BF 

1540 X=X+2 

1550 RETURN 

1560 A=0:LINE(X- 

, PRESET, BF 

1570 X=X-2 

1580 PUT(X-8,Y)- 

1590 LINE(X-8,Y) 

SET,BF 



,V31;1;1;1;1" 
-(X+8,Y+16) ,PRES 



(X+8,Y+16) ,DR 
(X+8,Y+16) ,DR 
-(X+8,Y+16) ,PRES 



8,Y)-(X+8,Y+16) , 



(X+8,Y+16) ,RT 
-(X+8,Y+16) ,PRES 



8,Y)-(X+10,Y+16) 



(X+8,Y+16) ,RT 
-(X+10,Y+16) ,PRE 



TRS-80 COMPUTER DISCOUNTS 




COLOR COMPUTERS 




26-3134 16k color II 


110.00 


26-3127 64k color comp 


165.00 


26-3131 1st disk drive 


269.95 


PRINTERS 




26-1276 DMP 105 


160.00 


26-1277 DMP-430 


700.00 


26-1278 DWP-220 


500.00 


26-1280 DMP-130 


275.00 


MODEL 4 and MSDOS COMPUTERS 


25-1000 mod 1000 


775.00 


25-1004 128K memory board 


169.95 


25-1005 2nd drive mod 1000 


160.00 


26-3211 Monochrome moniter 


125.00 


26-1070 mod 4D 64k 2dr. 


950.00 


26-5103 mod 2000 2dr. 


1.400.00 


26-5104 mod 2000 HD 


2.200.00 



We Carry the Complete Line of TRS-80 
Computer Products at Discount Prices 

CALL FOR A FREE PRICE LIST 800-257-5556 
IN N.J. CALL 609-769-0551 

WOODSTOWN ELECTRONICS 

Rt. 40 E. WOODSTOWN, N.J. 08098 
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1600 X=X-2 

161)3 PUT(X-8,Y)-(X+8,Y+16) ,R 

1620 RETURN 

1630 LINE(Xl-8, Yl)-(Xl+8, Yl+16) , 

PRESET , BF:Xl=Xl-2 

1640 PUT(X1-8,Y1)-(X1+8,Y1+16) ,L 

T 

1650 LINE(X1-8,Y1)-(X1+8,Y1+16) , 

PRESET, BF 

1660 Xl=Xl-2 

1670 IF DG<=0 THEN 2030 

1680 RETURN 

1690 LINE (Xl-8 , Yl) - (Xl+8 , Yl+16) , 

PRESET, BF 

1700 Xl=Xl+2 

1710 PUT(Xl-8, Yl)-(Xl+8, Yl+16) ,L 

T 

1720 LINE(X1-8,Y1)-(X1+8,Y1+16) , 

PRESET, BF 

1730 Xl=Xl+2 

1740 RETURN 

1750 IFX1>X+10THENRETURN 

17 60 IFXKX THENRETURN 

1770 IFA=3 OR A=4THEN1840 

1780 LINE(Xl-8, Yl)-(Xl+8, Yl+16) , 

PRESET, BF 

1790 IF1=1 THENPUT(X1-8,Y1)-(X1+ 

8, Yl+16), KL ELSE PUT (Xl-8 , Yl) - (X 



1986 
BEST OF THE UPGRADES LIST 



1. Memory 



.from 



64K DRAMS 
256K Kits 

2. ROM/BASIC Color Basic 1.2 

Extended Basic 1.1 . 

Disk Basic 1.1 

ADOS 

3. Storage Drive 

Drive 1 (external) 

Drive 1 (internal) 

4. Controllers J&M (you supply DOS) 

'Super Controller' . . . 

5. Monitor Driver Original Coco . . . 

Coco II 

6. Monitors Hi-Res Green/AmPer . . 

Color with audio 

7. Lower Case Kit 

8. Deluxe Keyboards . . . from . . . 

Please specify model or cal " of your CoCo when or- 
dering. Brands and prices subject to stock availabil- 
ity Send for free price list on over 200 Coco items. 



$ 19 

98 

$ 19 

29 

29 

40 

$209 

135 

80 

$ 89 

95 

$ 24 

34 

$ 89 

.169 

$ 49 

$ 59 



1316 Wilshire Blvd., Suite 206 
Los Angeles, CA 90017 

(213) 483-8388 

Ca. Res. 6<h% tax Shipping: $2 Software 

Visit our Retail Store Charges: $5 Hardware 



1+8, Yl+16) ,SL 

1800 DG=DG-1 

1810 PLAY "O5;T255;12;11;10;9;8" 

1820 LINE(Xl-8, Yl)-(Xl+8, Yl+16) , 

PRESET, BF 

18 30 RETURN 

1840 LINE(Xl-8, Yl)-(Xl+8, Yl+16) , 

PRESET, BF 

1850 IFRND(2)=2THENPUT(X1-8,Y1)- 

(Xl+8, Yl+16) ,SL ELSEPUT(X1-8,Y1) 

-(Xl+8, Yl+16) ,KL 

1860 LINE (Xl-8, Yl) -(Xl+8, Yl+16) , 

PRESET, BF 

1870 PLAY "05;T255;l;l;l;l" 

1880 RETURN 

1890 LINE(Xl-8, Yl)-(Xl+8, Yl+16) , 

PRESET, BF 

1900 PLAY "04;T6;2;3;4;5;6;P3;5; 

6 ; P3 ; 5 ; 6 ; P2 ; 4 ; P3 ; 1 ; 2 ; 3 ; 4 ; 5 ; P3 ; 6 ; 
LI; 4" 

1910 PLAY "T10;P1;O5;T10;12;P3;1 

1;11;10;10;9;9;L3;8" 

1920 PUT(Xl-8, Yl)-(Xl+8, Yl+16) ,D 

L,0R 

1930 PUT(X-16,Y)-(X,Y+16) ,M 

1940 PLAY "04;T15;1;2;1;2;3;2;3; 

3 ; 4 ; 3 ; 4 ; 4 ; 5 ; 4 ; 5 ; 5 ; 6 ; 5 ; 6 ; 6 ; 7 ; 6 ; 7 ; 

7 ; 8 ; 7 ; 7 ; 8 ; 9 ; 8 ; 8 ; 9 ; 8 ; 9 ; 9 ; 10 ; 11 ; 12 
; 12; 12; 12" 

1950 CLS 

1960 PRINT @0,"YOUR SCORE»";SC: 
L=L+1 

1970 PRINT "YOUR LEVEL NOW>>";L: 
PRINT "YOUR ENERGY POINTS»";DG 
1980 PRINT: PRINT: PRINT: PRINT : PRI 
NT " PRESS ANY KEY 

ii 

1990 I$=INKEY$ 

2000 IF I$=""THEN 1990 

2010 X=50:X1=200:H=0:I=I+.1:GOTO 
850 

2020 GOTO 2020 

2030 PLAY "01 ;T15; 12; 11; 12; 11; 10 

; 9 ; 10 ; 9 ; 8 ; 9 ; 7 ; 8 ; 6 ; 7 ; 5 ; 6 ; 4 ; 5 ; 3 ; 4 ; 

2;3;l;2;l;l;l" 
.2040 CLS 
[2050 PRINT "-=-=-=-=-=high score 

2060 PRINT "»»";HS 

2070 PRINT "YOUR SCORE»»" ;SC 

2080 PRINT .'PRINT: PRINT: PRINT: IF 

SOHS THEN HS=SC: PRINT •'******** 

*NEW HIGH SCORE********" 

2090 PRINT: PRINT " PRESS 

ANK KEY " 

2100 I$=INKEY$:IF 1$="" THEN 210 

2110 GOT0 10 



/R\ 
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Financing: 

The Economic Advantage 



By Bill Bernico 



Having been a car salesman for 
six years and a car rental man- 
ager for another four years, I've 
learned a lot about human nature and 
how people spend their money. Folks 
purchasing a new car might think that 
by taking the money out of their savings 
account to pay cash for their purchase 
that they are saving all that interest on 
the loan. Surprise! They've actually lost 
money doing it that way. This program 
will show in cold, hard figures which is 
the more economical move. It will also 
give skeptics a printout to take home 
and think about if they are not initially 
convinced after running the program. 

When using Cash vs. Financing, 
input the same dollar amounts and the 
same number of months in each case. In 
other words, compare "apples with 
apples." (Or should I say "CoCos with 
CoCos.") If you're considering a 
510,000 car and you have that amount 
in the bank, use S 10,000 in the financing 
section of the program in order to get 
an honest comparison. 



Bill Bernico is a car rental manager at 
a Dodge garage in Sheboygan, Wiscon- 
sin. His dealership-related programs 
were born out of necessity. Bill is 35 and 
a self-taught computerist who also 
enjoys playing golf. 



Naturally, the input for interest will 
vary between savings and financing, but 
use the same number of months in the 
comparison. Let's go through a sample 
session. For savings amount, input 
$10000 (no commas). For savings inter- 
est, let's use 8.75 (no percent sign 
necessary) and for months, input 48. 
Compound periods in this sample will 
be 2. The program will show you thai 
by the end of the 48 month period, your 
nest egg will be worth $14085.49 or a 
gain of $4085.49 in interest. 

This will put you into the finance part 
of the program. Your first input will be 
the finance amount. Again, use $10000. 
For finance interest, use 13.5 (even at 
this higher rate, you'll be surprised by 
the outcome). For the number of fi- 
nance months, again use 48 and it will 
show you that your monthly payment 
will be $270.76 or a total of $12996.48 
over 48 months. The interest you will 
have paid in those 48 months is 
$2996.48. 

Comparing this figure with the 
$4085.49 in interest you would have 
earned from the savings account, you 
can see that you've saved $1089.01 by 
financing and leaving your nest egg 
alone. If you can find finance rates 
lower than 13.5, then the savings will be 
that much more. 

At this point in the program, if the 



customer has still not been convinced to 
finance the car, the salesman can select 
from three options. Option 1 is a print- 
out of the comparison. Option 2 is to 
start over with new figures. Option 3 is 
to end the program. 

Option 1 , the printout, will ask for the 
customer's name as well as the sales- 
man's name. After the salesman inputs 
his name, the program will send the 
information to the printer. (This print- 
out was tailored for the TP-10 printer 
which we have in our showroom, but 
will work with other printers as well.) 
The printout will personalize the hard- 
copy that the customer gets. It also has 
the dealership name and address as well 
as the salesman who serviced him. It's 
nice to stay fresh in the customer's 
mind. 

Here is a sample printout from the 
program wejust ran. This program need 
not be restricted to automobile pur- 
chases. It can be used on any item you 
like for comparison purposes. 

One last note: 1 have fictionalized the 
name of the dealership in the printout 
as per my employer's request, and my 
apologies if there is really someone out 
there by the name of "Joe Average." 

(Questions about Cash vs. Financing 
may be directed to Mr. Bernico at 708 
Michigan Avenue, Shebovgan, WI 
53081, phone 414-459-7350.)' D 
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You see two ads for similar programs 

one's $30, the other $70 
Which program is better for YOUR needs? 

First, is Received & Certified 
(Thank-you Rainbow!) 

Then, there's a Review 
(Rainbow does it again!!) 



Now, how about 



mssm 



(Ask your software Dealer) 

< COMING SOON > 



With PREVIEW, you see the ACTUAL screens- 
(click on icons, pull down menus), get ACTUAL printouts. 
SEE the graphics on YOUR screen, (not nifty ad artworks) 

HEAR the music!!! 

AFTER ALL, why pay for something you can't see? 

(ask your Software Dealer) 

Do it all BEFORE you purchase the program! 
I | (ask your software dealer) 




Sample Printout 






HOMETOWN DODGE 






1234 NORTH 56TH STREET 






SHEBOYGAN, WI 53081 






(414) 555-4861 
ASK FOR BILL BERNICO 


<4& 




^\Jr 








^j/y 230 .. . 


...40 




SAVINGS AMOUNT .... Ipjdfijd 


| 430 
1 620 


. 211 
133 




SAVINGS INTEREST.. 8.75 % 


| END ... 


...70 




SAVINGS MONTHS 48 

COMPOUND PERIODS . . 2 
















SAVINGS AMOUNT 






AFTER 48 MONTHS... 14085.49 






INTEREST GAINED. . . 4085.49 


The listing: CASH 








FINANCE AMOUNT 10J300 


10 • *** CASH 


*** 


FINANCE INT 13.5 % 


20 '*** BY BILL BERNICO 


*** 


FINANCE MONTHS 48 


30 '*** 708 MICHIGAN AV 


*** 


MONTHLY PMT 270 . 76 


40 '*** SHEBOYGAN, WI 


*** 




50 '*** 53081 


*** 


TOTAL INTEREST 2996.48 


60 '*** (414)459-7350 


*** 




70 '*** 


*** 


JOE AVERAGE CAN SAVE $ 108 9.01 


80 CLS:B$=CHR$(12 8) 




BY FINANCING THIS VEHICLE 


90 PRINT§43 , "advantages" ;B$ ; "of 




100 PRINT@107,"financing";B$;"vs 


ASK US FOR ASSISTANCE IN 


110 PRINT8171, "paying" ;B$; "cash 


ARRANGING A LOAN FOR YOU. 


120 PRINT§2 9 9, "COURTESY 


OF" 



COCO SOLVER...THE SECRET WEAPON FOR GOOD GRADES <Q 

"An advanced programmable calculator CoCo Solver is a unique set 

ot programs that might be the most versatile package ever developed 

(or the color computer". ...Gary Clemens. Hot CoCo 5/85 

Why solve that Math or Science problem once when you can solve 

it hundreds ot times. When you can try every possibility, analyze every 

trend and understand every angle. Get the "edge" on your classmates. 

Get the Secret Weapon. Get CoCo Solver. 

Read the review ot CoCo Solver in February's Rainbow, then consider 

the following features ot every JTJ package: 

MACHINE LANGUAGE SCREEN EDITOR. Imagine sitting at your 
CoCo, editing any entry on-acreen. The first thing you'll notice is our 
cursor flashing above the last response you made for that entry. Press 
ENTER and accept the "default", or use our control keys to ESCAPE 
or to edit the entry onscreen. Our editor also controls the length ot 
the entry onscreen. No more chopped off entries. Press CURSOR 
BREAK once and relax while the cursor runs by itsell along the text. 
One keypress stops it Our editor is FUN! 

NEW 

COCO BASE 1...A RELATIONAL DATA BASE MANAGER 
Describe the structure of your database. Add, select, or edit records, 
then take ACTION. Compatible with any database you've set up with 
Basic. Are the others compatible with Basic? This program is great 
for quickly printing your data in tabular or custom formatted torm. 
Perform "what ifs" easily. Forty fields per record. Field length ol 1- 
255 characters. Our editor controls the length of the field entry 
onscreen. Index up to 600 records on any character field. Record 
length up to 2000 characters. 

COCO BASE 1 is the only program available which allows you to act 
on the data in your database with all the power ot your CoCo. You 
may use all the Basic string and numeric functions or any Basic 
command to act on each record. You can even schedule jobs to be 
run automatically. For the Beginner and tor the Expert. 

CoCo Solver and Program Generator. tape or disk only $49.95 

COCO BASE 1 disk only $49.95 

32K and Extended Basic required Add $2 for shipping. 

Tennessee residents add sales tax please. 

JTJ ENTERPRISES 

ATTN: D.M. JACKSON P.E. 

P.O. Box 110841 

Nashville, Tennessee 3721 1 

(615) 331-0364 (AFTER 5:00 AND WEEKENDS) 

No delay on check or money order. Sorry, no credit cards. 



The CoCo 

PROFESSIONAL - 

TAX 
PREPARER 

FOR THE 7RS80 COLOR COMPUTER 




breeze.. .you owe it to 



"...it makes income tax calculating 
yourself to leam how the right way." 

lioh Brawn, ftmnhim Julie N"/'»""<* Review' 

Special limited offer. Get the Professional Tax Preparer for only...* i/ " ." D 

Included wilh the program are a complete instruction manual and sample 
lorms. A set of 36 overlays is also available for S69.95. Take advantage ol our 
special offer and get BOTH the program and overlays for only S 149.95. 

The Professional Tax Preparer runs on 32K extended Basic, with one or 
two disk drives, and has built-in tax tables and rate schedules. It supports 
Form 1 040, Schedules*. B. C. D. E, G, SE. W, and Forms 2 1 06. 2 1 1 9. 3903 . 
4797, Office-at-Home. Installment Gain. Credits and Other Taxes. 

Features include reverse-screen scrolling, forward-screen block scroll, and 
full online diagnostics to check input. A built-in calculator supports 
arithmetic operations on numeric daia. Edit capability allows you to edit any 
line at any lime, using change, delele. hack, search, and insert commands. 
Yearly updates for the Program are available. 



Mail to: Micro Data Systems 
6 Edward Drive 
Ashland, MA 01721 



□ Mastercard 
Card* 



I 1 Visa 



D CoCo Professional SW.95 
C Set of 36 overlays 569.95 
D Get both S149.95 

— Check or Money Order Enclosed 
. Exp. Dale 



Address _ 
City. 



.Slate, 



.Zip. 



Signature 

I need the built-in sales lax table for 

Maty, mutatis ailil 5% goto lai Shipped pmt |«rf. 



. (state). 

r ifr/uvrv 
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§)CinSOFT 

PROGRAMS* PERIPHERALS' SUPPLIES' SERVICE 

For Coco . . . 

in the Midwest 

Now in our 4th year! 



New Catalog Now Available 




CALL OR WRITE 




includes . . . 
±7^Dt\uxt Joystick 
y I and Y-cjBIt ' ! 

C0C0M8M II » 79.95 

uiitn Y-cable 99.95 

uiitn Joystick 99,95 



LATEST 
VERSION! 

Features. . . 
•14 fonts 
•Shrink, Stretch 
Rotate 
•Multiple drives 
• Pattern Save 

UPGRADES AVAILABLE 
Disk I to II 20.00 
Tape I to Disk II 
25.00 




PRINTER SPECIAL! 

Star SG-10 J-/ vV l^ PRINTER 

Metric Industries Model 104 J^e* T INTERFACE 
Handsome brown vinyl. . . *M+/H . DUST COVER 

Spare replacement RIBBON 

Starter pak o_f PAPER 

O-JQ 00 

modem swnor... vJ I <7. COMPLETE 

SAVE 31.00 

"Authorized Star Micronics Service Center" 




%*>( DELUXE JOYSTICK B m 



EXCELLENT FOR COLOR COMPUTER 
USE IT FOR GRAPHICS. GAMES. ETC. 

CoCo owners will appreciate this high quality, 
durable joystick. Open gimbal design ... sell- 
centering or tree-lloatlng operation. Mechanical 
trims on both axes ... eight loot cable ... firing 
button has lifetime 5,000,000 presses. A two- 
button version ol the Deluxe Joystick is available 
for the Tandy 1000. DEALER INQUIRIES INVITED 




$27.50 each 
$49.95/pair 



CHOOSE FROM OUR LARGE 
SELECTION OF COCO PRODUCTS 

B5 ... Colorware ... Deft ... Derringer ... Diecom ... 

Dynacaic ... Elite ... HJL ... J & M ... Mark Data ... 

Metric Industries ... Michtron ... Microcom ... Microworks ... 

Tom Mix ... PBJ ... PXE ... Speech Systems ... Sugar ... 

TCE ... VIP ... Zebra ... and more! 

Shipped immediately Irom stock! 



Call 

513-396SOFT 



• Shop by Modem • 

513-396-SHOP 



I E3E333 



Write 
2235 Losantiville, Cincinnati, OH 45237 

SHIPPING will tie charged al our ACTUAL COST 
Ohio ft tidrni* add 5 V > Sale* Tai COD add 2 00 



130 PRINT@ 3 63, "HOMETOWN DODGE 

14)3 PRINT@484,"(HIT ANY KEY TO C 

ONTINUE) »; 

15/3 EXEC 44539 

16j3 A=0 : 1=0 : T=0 : Y=0 : V=0 : L=0 : P=0 : 

X=0 : N=0 : K=0 : 0=0 : U=0 : E=0 

170 CLS 

180 INPUT "SAVINGS AMOUNT " ; 

A 

190 INPUT"SAVINGS INTEREST...."; 

1:1=1/100 

200 INPUT "SAVINGS MONTHS " ; 

T:T=T/12 

210 INPUT" COMPOUND PERIODS ...."; 

Y 

220 V=A*(1+I/Y) A (Y*T) :V=INT(V*10 

0+.5)/100 

2 30 PRINT " AFTER" ;T* 12; "MONTHS. . . 

';v 

L=V-A 

PRINT" INTEREST GAINED $ 



PRINTSTRING$(3 2,"-") ; 

INPUT "FINANCE AMOUNT " 



INTEREST. 



240 
250 

";L 

2 60 

270 

P 

280 INPUT"FINANCE 

X:X=X/100 

290 INPUT"FINANCE 

N 

300 

310 

320 

";K 

330 

340 

350 

;o 

360 
370 

";U 

380 

390 

400 

";E 

410 

VER 

420 

430 

440 

450 

460 

470 

N$ 

480 

490 



MONTHS . 



K=P* (X/12)/ (1-(1+(X/12) ) A -N) 
K=INT(K*100+.5)/100 
PRINT"MONTHLY PAYMENT $ 

0=K*N 

O=INT(O*100+.5)/100 

PRINT"TOTAL OF PAYMENTS ...$ " 

U=INT((O-P)*100+.5)/100 
PRINT"TOTAL INTEREST $ 

E=INT ( (L-U) *100+ . 5) /100 

PRINT"AMOUNT SAVED 

PRINT" BY FINANCING $ 

PRINT@482, "PRINTOUT START O 

eND" ; 
A$=INKEY$:IF A$=""THEN 420 

IF A$="S"THEN 160 

IF A$="P"THEN 470 

IF A$="E"THEN 10 

GOTO 4 20 

CLS: INPUT" CUSTOMER'S NAME";C 



INPUT "SALESMAN'S 
CLS:PRINT§232,". 



500 PRINT#-2 / " 
ODGE 



NAME";SN$ 
. . .PRINTING. 

HOMETOWN D 
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510 PRINT#-2, 

H STREET 

52j3 PRINT#-2, 

53J381 
53j3 PRINT#-2, 
-4861 

54j3 PRINT#-2, 
55^ PRINT#-2 
56p PRINT#-2, 

»;A 

57j3 I=I*1J3)3 
58j3 PRINT#-2, 
» ;l;"% 

59j3 T=T*12 

6j3j3 PRINT#-2, 
ii. T 

61j3 PRINT#-2, 
II ;y 

62j3 PRINT#-2, 

630 PRINT#-2, 

.»;V 

640 PRINT#-2, "INTEREST GAINED. 

";L 

650 PRINT #-2 

660 PRINT#-2," 



" 12 3 4 NORTH 56T 
" SHEBOYGAN, WI 
" (414) 555 

"ASK FOR ";SN$ 
"SAVINGS AMOUNT. . . . 

"SAVINGS INTEREST.. 

"SAVINGS MONTHS 

"COMPOUND PERIODS.. 

"SAVINGS AMOUNT" 
"AFTER" ; T ; "MONTHS . . 



670 PRINT#-2 

680 PRINT#-2 , "FINANCE AMOUNT 

ii. p 

690 X=X*100 

700 PRINT#-2, "FINANCE INT 

";X;"% 

710 PRINT#-2 , "FINANCE MONTHS .... 

";N 

7 20 PRINT#-2, "MONTHLY PMT 

";K 

730 PRINT#-2 , "TOTAL OF PMTS 

";0 

740 PRINT#-2, "TOTAL INTEREST 

";U 

750 PRINT#-2 

760 PRINT#-2,CN$;" CAN SAVE $";E 

770 PRINT#-2,"BY FINANCING THIS 

VEHICLE 

780 PRINT#-2 

790 PRINT#-2,"ASK US FOR ASSISTA 

NCE IN 

800 PRINT#-2, "ARRANGING A LOAN F 

OR YOU. 

810 PRINT#-2:PRINT#-2:PRINT#-2:P 

RINT#-2 : PRINT#-2 : PRINT#-2 

820 CLS:PRINT@481, "aNOTHER PRINT 

OUT rESTART eND" ; 

830 A$=INKEY$:IFA$=""THEN830 

840 IF A$="A"THEN 500 

850 IF A$="R"THEN 160 

860 IF A$="E"THEN 10 

870 GOTO 830 f^ 



o 



r 



FIGHTER 
PILOT vv' 



i 



!,*: 




'■■ 



Fighter Pilot 

An original arcade gamel Wave after 
wave ol attacking aircraft attempt to 
shoot vou down as you maneuver your 
fighter into the wild blue yonder, 
blasting enemy fighters, bombers and 
paratroopers out of the sky. Joystick or 
keyboard operation. "Pause game" 
feature, Disk version saves high scores. 
32K. 100% Mochine Language. 

Tape $24.95 
Disk $29.95 

Mission of 
Vengeance 

A fantasy graphics adventure. You are 
Ga f otte Severinn. master thief, spy. and 
assassin Your mission is to kill the evil 
wizard Neemon, recover the holy 
scepter of Tash. and escape from 
Neeman's castfe. The reward is a 
fortune in gold, but beware... many 
dragons and monsters stand between 
you and the gold 1 32K. one disk drive 
required. 

Disk or Amdek $24.95 



Pumpman 

Vou II dig this 100% machine language 
arcade gamel The Pumpman carries a 
pump that he fires at aliens Pooky and 
Dragon as they change forms and 
chase him around under the ground. 
15 different screens, "pause game" 
feature. As fun and challenging as the 
original arcade version' 32K. one 
Joystick required, 

Tape $24.95 
Disk $29.95 



Hires + 

High Resolution 
Screen Enhancer 

HIRES - is a programmer's utility that 
adds a number ol features to BASIC: A 
high resolution screen with true upper 
ana lower cose ©tiers and variable 
screen width, scroll protect, key repeat, 
error- trapping, visual input routine, 
reset protection, true break disable 
ana more! 16K tape. 



$19.95 



Menu Maker 

The Ultimate in easy disk access and 
organization! Menu Maker is a 100% 
machine language utility that allows 
you to place attractive, customized 
menus on all of your diskettes and. with 
one one key press, load any program of 
your choice. Menu Maker is com- 
patible wilh RS DOS 1.0 and 1 i (soon 
with others!) and supports multiple* 
drive systems. 32K. one disk drive 
required. 

Disk or Amdek $24.95 



Magazine Index 
System 

M.I.S. helps you organize and keep 
track of those important magazine 
articles. Features include transter utility 
insuring compatibility with other data- 
base programs, last search routines, 
and the saving of data In a com- 
pressed format for more records per 
disk 16K. one disk drive required 

$14.95 



Software 
Closeoutl! 

We're Blowing Out All 

Tom Mix • Mark Data 

Prickly-Pear 

Petrocci • Sugar 

Call Or Write For 

Lowest Prices Anywhere! 

Quantities Limited 

Write For Free Catalog! 

Gift Certificates 
Available 



Eagle $24.95' 

Lunar Lander 32K Joyslicks Required 

Marooned! $29.95 

Adventure 32K, Diile Only 

Blackjack Dealer $24.95* 

Wilh Feeler Dealer 32K 

Sketchpad $19.95 

Graphics Drawing Program 32K. Diik Only 

Alpha -40+ $19.95 

Formats 40- tracks. More 1 32K. Disk Only 

Testmaker $29.95 

Geales VF. M/C Tests Disk Only 

Maycode $24.95' 

6800 Disassembler 32K 

• Add $5.00 For Disk 

We'll Ship Your Order 
For Only $1.00! 

Software Only - Hardware Shipped 

At Cost. 

Outside USA - S2.00 Per Program 



Saguaro 
Software 



(303) 728-4937 

P.O. Box 1864 
Telluride, CO 81435 



CO. Residents Add 7% Tax • C.O.D. Orders Add $3,00 
Dealer Inquiries Invited! 
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Forecast your budget, so in the future 
you can . . . 



Juggle Bills, Juggle Bills, 
Juggle A 11 the Way! 



By Glen Dufur 



This program, Home Budget 
Analysis, is used to assist in 
budgeting and forecasting per- 
sonal finances in order to plan and 
adjust cash flow for three future periods 
(paydays). The program allows you to 
enter and update income and expense 
items for each of the three periods. The 
total of income and expenses is calcu- 
lated and displayed for instant analysis 
of cash flow, as items are added or 
updated. The balance is money that has 
not been committed, or over-com- 
mitted, if a negative balance is calcu- 
lated. 

As a period passes, you may shift all 
amounts so the second period becomes 
current and a new third period is 
opened. This allows you to continue 
budgeting for future periods. Also the 
ability is given to save or load a file of 
personal finance data. 

Create New File/Load Existing File 

You are given two options upon 

running the program. Press 'C to create 

a new file or 'L' to load an existing file. 

• Create New File: You are prompted 

to enter the dates of the three future 

periods to be budgeted. Enter each 

Glen Dufur, a senior programmer ana- 
lyst with Airborne Freight Corpora- 
tion, lives in Issaquah, Washington. He 
has been designing and programming 
mainframe computer systems for 12 
years. 
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period date in the format "MM/ 
DD." 

• Load Existing File: You are prompt- 
ed to ready the cassette. Press any key 
when ready to load the file. 

Upon completion of entering the 
dates for creation of a new file or 
loading an existing file, the INCOME 
DISPLAY appears. You are now ready 
to begin entry or update of your per- 
sonal finance file. 

Add/Update/Delete Expense 
and Income Items 

Income items are accessed via the 
income display, expense items via the 
expense display. Press 'N' to add a new 
item, or "A-H" to update or delete an 
existing item. Be sure to include all 
known income and expenses that occur 
during each period, for example, gro- 
ceries, car expenses, rent, utilities, 
installment payments, savings, wages 
and other income. 

• Add Item: A prompt is given to enter 
the DESCRIPTION. A description is 
required for each item entered. You 
are then prompted to enter an AUTO 
AMOUNT. This amount is automat- 
ically entered for each period of the 
item being added. Press enter with- 
out an amount if you do not wish an 
auto amount. This function is handy 
when the amount is the same for each 
period. You are now ready to enter 
amounts for the added item (see 
Update). 



• Update Item: When updating an 
item, the display prompts for the 
period to update, 'V, '2' or '3'. Enter 
the proper period and a prompt 
appears to enter the AMOUNT To 
change the description and /or auto 
amount, press 'D\ A prompt appears 
to enter the new description. You are 
then prompted to enter the auto 
amount. 

• Delete Item: After selecting the item 
to be deleted, press '*'. The item is 
deleted and you are automatically 
returned to the income or expense 
display. 

Press 'R' to return to the income or 
expense display. 

Expense and Income Displays 

The income and expense displays list 
the items that represent the total of 
expenses and income. Options are 
available to move between the expense 
and income displays, in addition to 
adding or updating items. Press T while 
in the expense display to call the income 
display. The expense display may be 
recalled by pressing 'X'. 

Scrolling of items is accomplished by 
the up/down arrows while in either 
display. The last entry on the screen 
appears at the top when scrolled down 
and vice versa when scrolled up. 

The calculated total of expenses and 
income is shown for each period with 
the balance of uncommitted or over- 
committed amounts. 



Open New Period 

As a period has past, you may delete 
the current period and move all income 
and expenses forward and, therefore, 
open a new period. 

Press 'O' while in the expense or 
income display. The function prompts 
you to enter the date of the new period 
in the form "MM/DD." The program 
automatically shifts all amounts and 
drops the values for the current period. 
If you had entered an auto amount for 
any income or expense item, this 
amount is automatically entered into 
the new period for the item. 

Technical Information 

A maximum of 25 expense items and 
five income items have been imposed. 
Should your budget require more items, 
change the value of EN (expense items) 
and IN (income items) in Line 3000. 

Logic Flow 

Frequent Subroutines 
10 INKEY 
12 prompt alarm 



15 


blank two lines 


20 


top line 


25 


bottom line 


30 


screen load expenses 


45 


screen load income 


60 


calculate and print totals 




Other Subroutines 


100 


accept desc/default 


120 


delete expense 


130 


delete income 


140 


accept amount 


150 


basic screen 


170 


item screen 


185 


item bottom query 


190 


file full 


300 


expense display 


400 


expense item update 


500 


income display 


600 


income item update 


700 


shift period 


800 


LORD and SAVE 


900 


new file 


1000 


initialize and start 


1100 


menu 


2000 


PCLEflR 



Variables 




EDS(EN) 


expense description 


EA(EN,3) 


expense amount 


DE(EN) 


expense default 


LE 


last record expense 


IDS(IN) 


income description 


IA(IN,3) 


income amount 


DA(IN) 


income default 


LI 


last record income 


PDS(3) 


period dates 


TE(3) 


period total expense 


TI(3) 


period total income 


PB(3) 


period balance 


EN 


maximum expense records 




(preset to 25) 


IN 


maximum income records 




(preset to 5) 


IE$ 


flag E=expense, I = income 


K8) 


item addressability 


IX$(8) 


item addressability 


I$(8) 


item addressability 



(Any questions about Home Budget 
Analysis may be sent to the author at 
19816 SE 123rd, Issaquah, WA 98027, 
phone 206-235-3474. Please enclose an 
SASE when writing.) □ 



The listing: HOMEBDGT 



^f^v 



GOTO2000 
i 



40 ... 


....33 


610 ... 


....78 


80 ... 


...179 


720 ... 


....82 


130 .. 


....99 


835 ... 


...89 


170 .. 


1 


997 ... 


....15 


320 .. 


...230 


1110 .. 


...140 


430 .. 


....36 


END . , 


183 





FREQUENT SUBROUTINES 



1 
7 
8 

9 ' 

10 K$=INKEY$ : IFK$=" "THENGOTO10EL 
SEK=VAL(K$) : RETURN 

12 FORSS=1TO2:SOUND2 20,1:NEXTSS: 
RETURN 

13 FORSS=1TO9:SOUND2 20,1:NEXTSS: 
RETURN 

15 PRINTTAB(1)STRING$(30," " ) : PR 
INTTAB ( 1 ) STRING$ ( 3/3 , " " ) ; : RETURN 
20 PRINTTAB(1)STRING$(30,CHR$(14 
0) ) ; : RETURN 

25 PRINTTAB(1)STRING$(30,CHR$(13 
1) ) ;: RETURN 

30 IFLE=0 THENPRINT@163,"enter"B 
B$ ; " expense "BB$ " items " ; : SOUND2 00 
, 1 : RETURN 

31 PP=64:PX=PP:IX=l:FORX=I(l) TO 
(I ( 1) +6 ) : PRINT§PP+0 , STRING$ ( 32 , C 
HR$(143)) ; 

35 IFX<(EN+1) THENPX=PP:PRINT@PP 
+0,IX$(IX) ; :PX=PX+1:PRINT@PX,USI 
NG"% %";ED$(X) ; : PX=PX+7 : FORY= 
1TO3:IFEA(X,Y)<>0 THENPRINT@PX,U 
SING N2$;EA(X,Y) ; : PX=PX+8 :NEXTY: 
ELSEPX=PX+8 : NEXTY 



40 I(IX)=X:IX=IX+1:PP=PP+32:NEXT 
X : SOUND200 , 1 : RETURN 

45 IFLI=0 THENPRINT@163,"enter"B 
B$ ; " income" BB$ " items" ; : SOUND200 , 
1 : RETURN 

46 PP=64:PX=PP:IX=l:FORX=I(l) TO 
(1(1) +6) :PRINT@PP+0,STRING$(3 2,C 
HR$(143)) ; 

50 IFX<(IN+1) THENPX=PP:PRINT@PP 
+0,IX$(IX) ; :PX=PX+1:PRINT@PX,USI 
NG"% %";ID$(X) ; : PX=PX+7 :FORY= 
1TO3:IFIA(X,Y)<>0 THENPRINT@PX,U 
SING N2$;IA(X,Y) ;: PX=PX+8 : NEXTY: 

ELSEPX=PX+8 : NEXTY 
55 I(IX)=X:IX=IX+l:PP=PP+32:NEXT 
X : SOUND2 00 , 1 : RETURN 
60 FORX=lT03 : TE (X) =0 : FORY=lTOLE : 
TE(X)=TE(X)+EA(Y,X) : NEXTY, X : FORX 
=1T03 : TI (X) =0 : FORY=lTOLI : TI (X) =T 
I (X) +IA ( Y , X) : NEXTY , X : FORX=lT03 : P 
B(X)=TI(X)-TE(X) :NEXTX 
65 PRINT§288,CHR$(140) ; :GOSUB20: 
PRINT§320 , "expense" ; : PP=320 : FORX 
=1T03 : PP=PP+8 : PRINT@PP ,USINGN2$ ; 
TE(X) ; :NEXTX 

70 PRINT@352,"income";BB$; :PP=35 
2 : FORX=lT03 : PP=PP+8 : PRINT@PP , USI 
NGN2$;TI(X) ; :NEXTX 
75 PRINT@384, "balance"; :PP=384:F 
ORX=lT03 : PP=PP+8 : PRINT@PP , USING 
N2$;PB(X) ; .-NEXTX 

80 PRINT@416,CHR$ (131) ; :GOSUB25: 
RETURN 
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Toll Free 

Orders Only 

800-245-6228 



Information 
301-521-4886 



If You Pay Taxes 

You Need Coco-Accountant 



I 

I 
1 
1 
I 
I 

I 
I 

1 
I 

I 
I 



TAX 
DEDUCTIBLE 



"It's the most useful piece ol soft- 
ware I own. " 

That's what we hear again and 
again from folks who buy Coco-Ac- 
countant II. This 32/64K single-entry 
accounting system for the home and 
small business is all you need to 
manage your finances and give you 
the information you need at tax time. 

We wrote the original version for 
ourselves two years ago because 
we wanted to know three things: 
Where did the money come from, where did it go, and 
what can we deduct from our taxes? 

As it turned out, we liked it better than anything else 
on the market, so we decided to sell it. And we've been 
improving it ever since. 

People say they like it because it's easy to use. Just 
spend a few minutes each month entering your data: 
checks, cash outlays, credit card expenses or income. 
In any order. CoCo-Accountant takes the whole mess 
and makes sense out of it. Here's what it does: 

♦ Lists and totals entries by month, offsetting in- 
come against expenses. 

♦ Lists and totals entries by account, for a month or 
the whole year. 

♦ Lists and totals entries by payee or income 
source, for a month or the whole year. 




♦ Provides a year-to-date summary 
by account. 

♦ Prints a spreadsheet showing 
activity by account and month for 
the whole year (seeing this one is 
believing). 

♦ Flags deductible expenses. 

♦ Flags expenses subject to 
sales tax and figures out how much 
sales tax you paid! 

♦ Lets you define up to 48 ac- 
counts (in 64K version). 

♦ Takes 900 entries in 64K version, 500 in 32K disk 
and 450 in 32K tape. 

♦ Sorts entries by date. 

♦ Stores your data to tape or disk. 

You can use CoCo Accountant as a simple check- 
book register or make it into a comprehensive home ac- 
counting package. Our customers tell us they use it in 
the home, at school, for their clubs, churches and small 
businesses. In fact, they use it in ways we never 
dreamed of! 

CoCo-Accountant II is so easy to use and flexible 
that you'll be delighted. So stop shoving all those re- 
cords in a shoe box and join the computer age! 

The price of Coco-Accountant II is $34,95. Please be 
sure to tell us your memory requirements and whether 
you want tape or disk. 



Thoroughbred, Harness, Greyhound 




■HORSE RACES- 





-HARNE5S RACE 



Use your Color Computer to improve your performance 
at the track! These 1 6K programs for Thoroughbred, Har- 
ness and Greyhound racing rank the horses or dogs in 
each race quickly and easily, even if you've never handi- 
capped before. All the information you need is readily avail- 
able from the Racing form, harness or dog track program. 
We even provide diagrams showing you where to find each 
item! 

Thoroughbred factors include speed, distance, past 
performance, weight, class, jockey's record, beaten favor- 
ite and post position. Harness factors include speed, post 
position, driver's record, breaking tendencies, class, oark- 



ed-out signs and beaten favorite. Greyhound factors in- 
clude speed, past performance, maneuvering ability, favor- 
ite box, class, kennel record, beaten favorite and breaking 
ability. 

We include complete instruction and a wagering guide 
that tells you which races to bet and which to avoid — one 
of the real secrets of good handicapping. You can buy a 
more expensive handicapper, but we don't think you can 
buy a better one! Thoroughbred, Harness or Greyhound 
Handicapper, $34.95 each on tape or disk. Any two for 
$54.95 or all three for $74.95. 



1 
i 

8 
1 
I 
1 
I 



» i 



DOG RACES 

I 
I 



Federal Hill Software 8134 Scotts Level Rd. Baltimore. Md. 21208 




97 ' 

98 'OTHER SUBROUTINES 

99 ' 

1)3)3 PRINT§448 , " " ; : GOSUB15 : PRINT® 
449,"" ;:GOSUB12:LINEINPUT"DESC: 
" ; XX$ : IFXX$=" " THENSOUND1 , 1 : GOTO 
100ELSEPRINT@132,"*** "XX$" ***" 

1/32 PRINT@448,""; :GOSUB15 : PRINT§ 
449 , "AUTO AMOUNT" ; : GOSUB12 : INPUT 
XX 

105 IFIE$="E" THENED$(I)=XX$:DE( 
I)=XX:IFEA(I,1)=0 ANDEA(I,2)=0 A 
NDEA ( 1 , 3 ) =0 THENF0RX=1T03 : EA ( I , X 
) =DE ( I ) : NEXTX : RETURN : ELSERETURN 
11)3 ID$(I)=XX$:DI(I)=XX:IFIA(I,1 
)=0 ANDIA(I,2)=0 ANDIA(I,3)=0 TH 
ENF0RX=1T03 : IA ( I , X) =DI ( I ) : NEXTX : 
RETURN : ELSERETURN 

120 IFI=LE THENED$(I)="":DE(I)=0 
: F0RZ=1T03 : EA ( I , Z ) =0 : NEXTZ : LE=LE 
-1: ELSEFORX=I TOLE-1 : IFED$ (X+l) 
<>"" THENED$(X)=ED$(X+1) :ED$(X+1 
) ="" : DE (X) =DE (X+l) : DE (X+l) =0 : FOR 
Z=1T03 : EA ( X , Z ) =EA (X+l , Z ) : EA (X+l , 
Z )=0:NEXTZ: NEXTX :LE=LE-1: ELSENE 
XTX 

12 5 RETURN 

13)3 IFI=LI THENID$(I)="":DI(I)=0 
:FORZ=l TO3:IA(I,Z)=0:NEXTZ:LI=L 
1-1: ELSEFORX=I TOLI-l:IFID$(X+l 
)<>»'• THENID$(X)=ID$(X+1) :ID$(X+ 
1) ="" : DI (X) =DI (X+l) : DI (X+l) =)3 : FO 
RZ=1T03 : IA (X, Z ) =IA (X+l , Z ) : IA (X+l 
, Z)=0:NEXTZ : NEXTX: LI=LI-1: ELSEN 
EXTX 

13 5 RETURN 

140 PRINT@448 , " " ; :GOSUB15 : PRINT@ 

44 9,"PERIOD"K"AMOUNT"; :GOSUB12:I 

NPUTXX : IFIE$="E" THENEA ( I , K) =XX 

ELSEIA(I,K)=XX 

145 RETURN 

150 CLS : PRINT" "; :IFIE$="E" THENP 

RINTSTRING$ (32, CHR$ (242)); ELSEP 

RINTSTRING$(32,CHR$(162) ) ; 

155 PRINT@16, "display" ;BB$; : PRIN 

T§32 , BB$ ; "period>" ; : PRINT@42 ,USI 

NGN3$;PD$(1) ; : PRINT@50 ,USINGN3$ ; 

PD$(2) ;:PRINT@58,USINGN3$;PD$(3) 

;:IFIE$="E" THEN160 ELSE165 

160 PRINT@7 , BB$ ; "expense" ; BB$ ; : P 

RINT@449, "a-h nEW EXPENSE iNCO 

ME SAVE"; :PRINT@481," <ARROWS> 

OPEN NEW PERIOD"; : RETURN 
165 PRINT@8 , BB$ ; "income" ; BB$ ; : PR 
INT@449,"a-h nEW INCOME ExPENS 
E SAVE"; :PRINT@481," <ARROWS> 
OPEN NEW PERIOD"; : RETURN 



170 CLS : PRINT @ 19 3," PERIOD 

AMOUNT ";:PRINT@227, STRING 
$(10,CHR$(131) ) ; :PRINT@242,STRIN 
G$(8,CHR$(131) ) ; :PRINT@3 85,"AUTO 

AMOUNT: "; :PRINT@416, ""; :GOSUB2 5 
175 PRINT@32,"" ; : GOSUB20 : PRINT: I 
FIE$="E" THENPRINTTAB(5) "EXPENSE 

ITEM UPDATE" : ELSEPRINTTAB (5) "IN 
COME ITEM UPDATE" 
180 GOSUB2 5: RETURN 
185 PRINT@449,""; :GOSUB15 :PRINT§ 
449," UPDATE PERIOD <1> <2> <3 
> dESC * DELETE nEW ITEM rET 
URN"; : RETURN 

190 PRINT@449,""; : GOSUB15 : PRINT@ 
449," file full - press enter";: 
GOSUB10 : RETURN 

297 ' 

298 'EXPENSE ITEM UPDATE 

299 ' 

300 IE$="E":I(1)=1 

305 PP=3 2:GOSUB150:GOSUB60:GOSUB 

30 

310 I=0:GOSUB10 

315 IFK$=CHR$ (10) THENI (1) =1 (1) + 

6 : IFI ( 1 ) >LE THENI ( 1 ) =LE : GOSUB3 : 

GOT03 10 : ELSEGOSUB30 : GOT03 10 

320 IFK$=" A " THENI (1) =1(1) -6: IF 

I(1)<1THEN I(1)=1:GOSUB30:GOTO31 

ELSEGOSUB30:GOTO310 

325 IFK$="N" THENGOSUB400:GOTO30 

5:ELSEIFK$="I" THEN500 ELSEIFK$= 

"S" THENIO=2:GOSUB800:GOTO300 EL 

SEIFK$="0" THENGOSUB700 : GOTO300 

330 F0RX=1T08:IFK$=I$(X) THENI=I 

(X) : NEXTX :ELSENEXTX 

335 IFI=0 THEN340 ELSEIFI>ENTRIE 

S THEN340 ELSEIFED$ (I) ="" THEN34 

ELSEGOSUB400:GOTO305 

340 SOUND1,1:GOTO310 

397 ' 

3 98 'EXPENSE ITEM UPDATE 

399 ' 

400 SOUND200,1 

405 IFK$="N" THENLE=LE+1:I=LE:IF 
LE>EN THENLE=EN:GOSUB190: RETURN 
410 GOSUB170:PRINT@132,"*** "ED$ 
(I)" ***■■; :PP=259:F0RX=1T03:PRIN 
T@PP,X; :PRINT@PP+2,">"; :PRINT@PP 
+4,USINGN3$;PD$(X) ; : PRINT@PP+15, 
USING N2$;EA(I,X) ; : PP=PP+3 2 :NEXT 
X:PRINT§402,USINGN2$;DE(I) ; 
415 IFK$="N" THENGOSUB100:K$="": 
GOTO410: ELSEGOSUB185 
420 GOSUB10:IFK$="R" THENRETURN 
ELSEIFK$="*" THENGOSUB120: RETURN 
:ELSEIFK$="D" THENGOSUB100:GOTO4 
00ELSEIFK$="N" THENGOT04^ 
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425 IF K>0 AND K<4 THENGOSUB140 : 

GOTO410 

430 SOUND1,1:GOTO420 

497 • 

498 

499 

5^5j3 

505 

45 

51J3 

515 



'INCOME DISPLAY 

i 

IE$="I":I(1)=1 

PP=3 2 : GOSUB150 : GOSUB60 : GOSUB 



1=0 : GOSUB10 

IFK$=CHR$(10) THENI(1)=I(1)+ 
6:IFI(1)>LI THENI(l)=LI:GOSUB45: 
GOTO510 : ELSEGOSUB45 : GOTO510 
520 IFK$="^" THENI(1)=I(1)-6:IF 
I(1)<1THEN I(l)=l:GOSUB45:GOT051 
0ELSEGOSUB45 : GOTO510 
525 IFK$="N" THENGOSUB600:GOTO50 
0:ELSEIFK$="X" THEN300 ELSEIFK$= 
"S" THENIO=2:GOSUB800:GOTO300 EL 
SEIFK$="0" THENGOSUB700 : GOTO500 
530 F0RX=1T08:IFK$=I$(X) THENI=I 
(X) :NEXTX:ELSENEXTX 

535 IFI=0 THEN540 ELSEIFI>9 THEN 
540 ELSEIFID$(I)=" M THEN540 ELSE 
GOSUB600:GOTO505 



540 


SOUND1,1:GOTO510 


597 


i 


598 


'INCOME ITEM UPDATE 



599 ' 

600 SOUND200,1 

605 IFK$="N" THENLI=LI+l:I=LI:IF 
LI>IN THENLI=IN:GOSUB190: RETURN 
610 GOSUB170:PRINT@132,"*** "ID$ 
(I) " ***»; :PP=2 59:F0RX=1T03:PRIN 
T@PP,X; :PRINT@PP+2,">"; :PRINT@PP 
+5,USINGN3$;PD$(X) ; : PRINT@PP+15 , 
USING N2$;IA(I,X) ; : PP=PP+32 :NEXT 
X:PRINT@402,USINGN2$;DI(I) ; 
615 IFK$="N" THENGOSUB100:K$= M " : 
GOTO610: ELSEGOSUB185 
620 GOSUB10:IFK$="R" THENRETURN 
ELSEIFK$="*" THENGOSUB130: RETURN 
: ELSEIFK$="D" THENGOSUB100 : GOT06 
00ELSEIFK$="N" THENGOTO600 
625 IF K>0 AND K<4 THENGOSUB140 : 
GOTO610 



630 
697 
698 
699 
700 
705 



SOUND1,1:GOTO620 



'OPEN NEW PERIOD 



CLS:SOUND200,1 

PRINT@129 , STRING$ ( 30 , CHR$ ( 14 
0) ) :PRINTTAB(3) "SHIFT AND OPEN N 
EW PERIOD": PRINT TAB (1) STRING$ (3 
0,CHR$(131)) 
710 GOSUB12:PRINT@292, "HIT ANY K 




Makes learning so much FUN . . . 
. . . that kids think it's a game! 

LEVEL 1: Echos each key pressed in solid 
block letters and plays a random 
melody. 

LEVEL 2: The user echos the random 

number or letter. The computer 
responds with a random melody. 

level 3: The user echos random words 
displayed. The computer echos 
with a random melody. 

$24 16k ECB 

disc or tape 



send lor more information: 

Challenger Software 

42 4th Street 

Pennsburg, PA 18073 

Call (215) 679-8792 (Evenings) 



RAINBOW 



CflTtlCAIlON 



Formaker 

the fastest, most complete 
office package yet! 

Totally Menu Driven 

Customize with company information 

Complete "on screen" instructions 



FORMS 


STORES 


FIGURES 


letter 


complete forms 


quantity 


invoice 


item list 


list 


quote 


subquotes 


net 


purchase order 


letters 


discount 


mail order 


footnotes 


subtotals 


confirm order 


customer info 


tax 


receipt 




freight, etc. 


SEPARATE CONFIGURE 




PROCRAM 




PRINTS 


for company info 


form feed 


printer options 




letterhead 


quote & inv. # 




envelope 


w/auto sequencing 


multiple copy 


auto date 


$< 


emphasized 
i9 32k ECB disc 



Challenger Software 

42 4th Street 

Pennsburg, PA 18073 

Call (215) 679-8792 (Evenings) 
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EY TO CONTINUE OR r 

ETURN";:GOSUB10:IF K$="R" THENRE 
TURN 

715 PRINT@288,"":GOSUB15, : PRINT @ 
289,"ENTER NEW PERIOD DATE (MM/D 
D)"; :PRINT@335,""; :GOSUB12 : LINEI 
NPUT"" ;XX$ : PRINT@288 , "" ; : GOSUB15 
:PRINT@294,"NEW PERIOD FOR ";XX$ 
: PRINTTAB ( 6 ) " NOW BEING OPENED"; 
720 FORX=lTOLE:EA(X,l)=EA(X,2) :E 
A(X ; 2)=EA(X,3) :EA(X,3)=DE(X) :NEX 
TX:FORX=lTOLI:IA(X,l)=IA(X,2) : IA 
(X,2)=IA(X,3) :IA(X,3)=DI(X) : NEXT 
X:PD$(1)=PD$(2) :PD$(2)=PD$(3) : PD 
$ (3 )=XX$: RETURN 

797 ■ 

798 'I/O ROUTINES 

799 ■ 

800 CLS:SOUND200,1 

805 IFIO=l THENIO$="LOAD" ELSEIO 

$="SAVE" 

810 PRINT@64 , " " ; : GOSUB20 : PRINT@1 

05,10$;" FILE"; :PRINT§128,""; :G0 

SUB25 

815 GOSUB13:PRINT@193, "POSITION 

TAPE . . . " : PRINT" READY CASSETTE . . 

.": PRINT" PRESS ANY KEY TO CONTI 

NUE" : GOSUB10 : PRINT§19 2 , " " : G0SUB1 

5:GOSUB15:IFIO=2 THEN845 

820 '* LOAD FILE * 

825 SOUND220,1:PRINT§193," LOADI 

NG BUDGET FILE"; 

830 0PEN"I",#-1, "BUDGET" :SOUND22 

0/1 

835 INPUT#-1,LE,LI:F0RX=1T0LE:IN 

PUT#-1,ED$(X) ,DE(X) : F0RY=1T03 : IN 

PUT#-1 , EA (X, Y) : NEXTY , X : F0RX=1T0L 

I:INPUT#-1,ID$(X) ,DI(X) :F0RY=1T0 

3 : INPUT* -1 , IA (X , Y ) : NEXTY , X : F0RX= 

1T03:INPUT#-1,PD$(X) :NEXTX 

840 CL0SE#-1: RETURN 

845 SOUND220,1 

850 PRINT@193," SAVING BUDGET FI 

LE" ; :MOTORON: FORX=1TO600 :NEXTX 

855 OPEN "0", #-1, "BUDGET" :S0UND2 

20,1 

860 PRINT#-1,LE,LI:F0RX=1T0LE:PR 

INT#-1,ED$(X) ,DE(X) : F0RY=1T03 : PR 

INT#-1 , EA (X , Y) : NEXTY , X : F0RX=1T0L 

I:PRINT#-1,ID$(X) ,DI(X) :F0RY=1T0 

3:PRINT#-1,IA(X,Y) : NEXTY , X : F0RX= 

1T03 : PRINT#-1 , PD$ (X) : NEXTX 

865 CL0SE#-1: RETURN 

897 ■ 

898 'CREATE NEW FILE 

899 ' 

900 CLS : SOUND200 , 1 

905 PRINT© 3 3 , " " : GOSUB20 : PRINT : PR 



INTTAB(6) "ENTER PERIOD DATES" : GO 
SUB25 

910 PP=3 60 : F0RX=1T03 : PRINT@214 , " 
" ; : G0SUB15 : PRINT@161 , "PERIOD #" ; 
X; :PRINT§227,"" ; : G0SUB12 : LINEINP 
UT" ENTER DATE (MM/DD) : ";PD$(X): 
PRINT@PP, "PERIOD ";X"~> " ; : PRIN 
TUSINGN3$;PD$(X) : PP=PP+3 2 : NEXTX: 
GOTO500 

997 ' 

998 'INITIALIZE PROGRAM 

999 » 

1000 CLEAR500 : SOUND200 , 1 : EN=2 5 : 1 
N=5:DIMED$(EN) :DIMEA(EN,3) :DIMPD 
$(3) :DIMIA(IN,3) :DIMI$(8) :DIMI(8 
) :DIMDE(EN) :DIMID$(IN) :DIMDI(IN) 
: DIMIX$ ( 8 ) : DIMTE ( 3 ) : DIMTI ( 3 ) : DIM 
PB(3) 

1005 LE=0:LI=0:FORX=1TO8:READIX$ 
(X) ,I$(X) ,I(X) :NEXTX 
1010 DATA a,A,l,b,B,2,c,C,3,d,D, 
4,e,E,5,f,F,6,g,G,7,h,H,8 
1015 N0$="##":N2$="####.##-»:N1$ 
="+####. ##":LD$="% %":N3$="% 
%":BB$=CHR$(128) 
1030 ' 

1100 SOUND200,1 

1105 CLS : PRINT@99 , "home" ; BB$ ; "bu 
dget" ; BB$ ; "analysis" : PRINT : PRINT 
" BY: GLEN DUFUR" : PRINT" C 
OPYRIGHT (C) 1985" 

1110 PRINT : PRINTTAB (4 ) "10AD EXIS 
TING BUDGET FILE" : PRINT: PRINTTAB 
(4) "CREATE NEW BUDGET FILE":PRIN 
T@424, "SELECT OPTION"; 
1115 IFXX$=CHR$(161) THENXX$=CHR 
$(162) :XY$=CHR$(164) :XZ$=CHR$(16 
6): ELSEXX$=CHR$(161) :XY$=CHR$(1 
68) :XZ$=CHR$(169) 

1120 PRINT@65,CHR$(138) ; : PRINTST 
RING$(22,XX$) ;CHR$(133) ;:PRINT@1 
29,CHR$(138) ;STRING$(22,XY$) ;CHR 
$ ( 133 ) ; : K$=INKEY$ : PRINT@97 , CHR$ ( 
138) ;XZ$;:PRINT@119,XZ$;CHR$(133 

) 

1125 PRINT@438," ";:IFK$="" THEN 

1115 ELSEIFK$="L" THENI0=1 : GOSUB 

800:GOTO500: ELSEIFK$="C" THEN90 

9> 

1130 PRINT@438,K$;:SOUNDl,5:GOTO 

1115 

1200 'CSAVE "BUDGET" ROUTINE 

1205 F0RX=1T02 rMOTORON: F0RY=1T06 

00 : NEXTY : MOTOROFF : CSAVE " BUDGET " : 

NEXTX : F0RX=1T05 : SOUND200 , 1 : NEXT : 

END 

1999 'PCLEAR ROUTINE 

2000 PCLEAR1 : GOTO 1000 ^ 
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A Disk Tinkerer's Device 



By Martin H. Goodman 



There was an excellent article in 
the December 1985 RAINBOW, 
"Zapping with Confidence," 
Page 118 by Jeffry Dwight, that pro- 
vided a well-designed "disk zap" utility. 
Now you can have an easy means to 
examine and modify disks. In this 
article I will try to aid such hardy 
tinkerers by discussing some aspects of 
just what you will see when you look at 
your disks. Some of this material is 
explained in the Radio Shack Disk 
Extended BASIC manual in Chapter 1 1. 
Some of the material, however, is not 
given there, especially the information 
on specific file structure. 

As a bonus, I'll provide you with a 
utility. Called Analyzer, it automati- 
cally gathers up the widely separated 
information on just where given direc- 
tory files are on your disk and prints it 
out in a neat fashion. Analyzer can be 
used in conjunction with any disk 
editor, such as the one mentioned 
above. 

Note 1: There may be some confusion 

Martin H. Goodman, M.D., a physi- 
cian trained in anesthesiology, is a long 
time electronics tinkerer and outspoken 
commentator on CompuServe and 
Delphi (sort of the Howard Cosellofthe 
CoCo Community). Among his numer- 
ous hardware and software design, 
production and marketing projects, he 
introduced Graphicom and WEFAX to 
the Co Co world. His non-computer 
passions include running, mountaineer- 
ing and outdoor photography. Marty 
lives in San Pablo, California. 



about what number (zero or one) is the 
first number in a given sequence. The 
first sector on a track is numbered one, 
yet the first track on the disk is num- 
bered zero. The first byte in the direc- 
tory entry is called "byte zero." The first 
granule is called granule number zero. 
These are arbitrary conventions. They 
are not all consistent with each other, 
and are a pain to remember . . . but 
remember them a hacker must! 

Note 2: When referring to the data on 
the disk, I'll denote it in two different 
forms. When I say the first 1 1 bytes 
contain the filename and extension, 1 
mean that the data is there in ASCII 
code. However, when I say the File Type 
flag byte will be 0, 1, 2 or 3, I am 
indicating the Hex value of that byte. 
When 1 later refer to the value of a byte 
in the Granule Allocation Table, I'll also 
be referring to its Hex value. 

The letter 'A' in ASCII is represented 
as Hex 41. Most disk zappers offer the 
option of displaying a sector in either 
Hex or ASCII. The one published in the 
December RAINBOW had even more 
options (decimal and binary) for how to 
display the data from the disk. The best 
disk zappers use a technique to display 
at the same time both the ASCII value 
and the Hex value of at least a selected 
byte in the sector, if not some or all of 
the sector. Some disk zappers ( VfPs, for 
example) display "screen code" values 
of the sector. This is vaguely like an 
ASCII display, but the data is repre- 
sented somewhat differently. With such 
zappers, the ASCII/ Hex options need 
to be used. In this article, when I make 



reference to text I'm talking ASCII, but 
when I specify to numeric information 
I am talking Hex. 

Note 3: I will assume we are consid- 
ering only normal Radio Shack/ Micro- 
soft Disk Extended BASIC files here. 
What follows is not relevant directly to 
OS-9, copy-protected material or to 
noncopy-protected, but also non stand- 
ard format disks, such as some new 
Radio Shack games, the new Infocom 
games and Graphicom or WEFAX 
picture disks. 

Note 4: I will assume you are familiar 
with the fundamental divisions of data 
on a disk: the 35 tracks and the 18 256- 
byte sectors that are standard for Radio 
Shack's Disk Operating System. The 
Radio Shack Disk Extended BASIC 
manual is quite clear on this matter. I 
will also assume you understand that a 
"granule" consists of nine sectors on the 
disk, thus is 214K in size and can occupy 
either the first or the last nine sectors 
(numbered 1 through 9 or 10 through 
18) on a given track. Every track except 
Track 17 (the directory track) consists 
of two granules. The directory track is 
excluded from granule notation. There- 
fore, Track 0, Sector 1 is the first sector 
in granule number 0, Track 16, Sector 
18 is the last sector in Granule 33 and 
Track 18, Sector 1 is in Granule 34. 

Note 5: Most of the time I will use 
Hex notation, but sometimes I will use 
decimal. Thus, when I refer to Track 17, 
I am talking decimal. Whenever 1 use 
Hex, I'll specify it by writing the word 
"Hex" or by preceding the number with 
a dollar sign ($). 
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These notes may seem tedious, but 
hopefully they will help the novice get 
past some of the conventions that 
longtime hackers often accept and 
understand without thinking about 
them, yet are sometimes confusing to 
the newcomer. 



Track 17, Sector 3 and up. The first 
eight bytes oi the entry are the filename, 
the next three are its extension. These 
1 1 bytes normally contain ASCII char- 
acters. Files that were killed will have 
the first bvte in their name changed to 
HexO. 



the ASCII flag set to zero. ASCII text 
files (File Type flag = I) have their 
ASCII nag set to Hex FF 

Byte SOD: First Granule 

This is the number of the first granule 
used for the file. 



Directory Structure 

When you type DIR, you see a listing 
of filenames, extensions and then a 
number, a letter and another number. 
The first number displayed is the File 
Type, the letter is the ASCII flag and the 
last number is the number of granules 
in that file. Everything except for the 
information on how many granules 
there are in the file is directly recorded 
in the directory entry. 

The directory starts on Track 1 7 ( Hex 
$11), Sector 3. Each entry is 32 (Hex 
$20) bytes long, of which only the first 
16 (Hex $10) bytes are used. The re- 
maining 16 bytes are "reserved for 
future use" by Microsoft. Therefore, 
one sector can hold up to eight directory 
entries. If the directory has more than 
eight files on it, then more sectors 
(Track 17, sectors 4, 5, 6, etc.) are used. 
Let's look at Track 17, Sector 3. 

Bytes $00 through SOA: Filename 
and Extension 

As can be learned from reading 
Chapter 1 1 of the Radio Shack manual, 
filenames in the directory are placed on 



Byte $0B: File Type Flag 

The next one is the File Type flag. 
This byte equals 00 for tokenized BASIC 
programs. It equals Hex 1 for what the 
Radio Shack manual calls "BASIC data 
files," or what you will encounter as 
"ASCII basic" files, or as with many 
word processors and editor/ assemblers, 
ASCII text files. It equals Hex 02 for 
machine language programs. The man- 
ual says this byte equals Hex 03 for "text 
editor source files." This File Type is 
rarely encountered, except by users of 
Color Scripsit. To those. I suggest 
buying Telewriter and Telepauh or VIP 
Writer or Elite Word. You'll have a 
much better word processor and won't 
have to worry about text editor source 
files. 

Byte $0C: ASCII Flag 

The ASCII flag follows the File Type 
Hag. This single byte is set to zero if the 
file is in binary format, and set to Hex 
FF if the file is in ASCII format. To- 
kenized basic is a kind of binary File 
Type; so is a machine language pro- 
gram. Thus, both of those tend to have 



Sample Run 



* INDICATES A KILLED FILE WHEN IN FRONT OF FILE HAKE 

* INDICATES INVALID GAT ENTRY IN GAT LISTING 

KILLED FILES THAT ARE NOT LISTED AS 'SCRUNCHED GAT 1 HAVE HOST LIKELY 
BEEN WRITTEN OVER BY A NEW FILE AND ARE REALLY LOST! 



DIRECT1 /BAK BASIC data file ASCII 
00,01,02,03,04,05,06 

2 = * OF SECTORS IN LAST GRAN 
2 = S OF BYTES IN LAST SECTOR 

DIRECT2 /BAK BASIC data file ASCII 
07, 08, 09, 0A 

6 = S OF SECTORS IN LAST GRAN 
33 = S OF BYTES IN LAST SECTOR 

DISKANAL/BAK BASIC program BINARY 
0B 

9 = * OF SECTORS IN LAST GRAN 
FF = it OF BYTES IN LAST SECTOR 

DIRECT1 /TXT BASIC data file ASCII 
0C,0D,0E,0F,10,11,12 

2 = f OF SECTORS IN LAST GRAN 
2 = ; OF BYTES IN LAST SECTOR 

DIRECT2 /TXT BASIC data file ASCII 
13,14,15,16 

6 = S OF SECTORS IN LAST GRAN 
3B = # OF BYTES IN LAST SECTOR 

DISKANAL/3AS BASIC program BINARY 
17 

9 = * OF SECTORS IN LAST GRAN 
FF = # OF BYTES IN LAST SECTOR 



Bytes $0E and $0F: Number of Bytes 
in Last Sector 

Byte $0E is the high order byte, and 
is either zero or one — most of the time 
it is zero. If one, the next byte is zero, 
and 256 bytes in use (a full sector) are 
specified. Byte 15 varies from one 
through FFto signify from one through 
255 bytes used in the last sector of the 
file. Bytes $10 through $1F are "re- 
served" from back in 1981 for "future 
use." They have never been used. 

Note here that while bytes Hex 0D.OE 
and OF provide some information about 
where the file resides on the disk and 
how far it extends, they leave out a lot! 
They give no clue, in and of themselves, 
as to how many granules there are in the 
file or of how many sectors are used in 
the last granule of the file. To find that 
out, you have to move over to Track 1 7. 
Sector 2. called the Granule Allocation 
Table, or GAT. 

The GAT 

The GAT occupies Track 17, Sector 
2. Actually, only the first 68 bytes of 
Track 17, Sector 2 constitute the GAT. 
The disk manual incorrectly states that 
the remaining bytes in that sector will 
be zero. Anyone who's ever looked at 
a disk with a zapper knows this is not 
true. Indeed, due to some sloppy code 
in Disk BASIC, copies of pieces of the 
directory itself wind up in the space 
beyond the 68th byte of Track 17, 
Sector 2. This little idiosyncrasy had to 
be corrected by authors of Disk BASIC 
modifications who were implementing 
support for 40- and 80-track drives, but 
that's another story. Suffice it to say 
here that in a normal Disk BASIC disk, 
the first 68 bytes of Track 17. Sector 2 
are the GAT and the remaining bytes 
are "garbage." 

The first byte in the GAT is "byte 
number zero." Each byte in the GAT 
corresponds to the status of a given 
granule on the disk. That status is 
encoded as follows: If the GAT byte is 
equal to $FF, then the corresponding 
granule is avilable for new files. On a 
blank disk this is a blank (all $FF) 
granule; on an often-used disk, which 
has had files killed and other files 
written to it, that granule might contain 
some data from a previously killed file. 
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mSome companies 
will tell you 
their programs 
are integrated. 

mDerringer 
software speaks 

for itself. 



06 Lots of companies claim that their programs are integrated. 
All they mean is that several programs are on the same disk. 
And only a few of them talk to each other. Crude systems that 
lack features can be a real headache. 

■ At Derringer Software, when we say our programs are 
integrated, we mean that our programs talk to each other. 
Our PRO-COLOR-SERIES is completely compatible with 
DYNACALC " and TELEWRITER-64.™ These three programs 
are among the most flexible on the market today. 

■ Investigate before you make any investment. Derringer 
Software will prove itself worthy. We produced the first serious 
database program for the Color Computer back in 1982. And 

it has remained the popular choice ever since. Now that's really 
saying something! 

Derringer Software, Inc. 

PO Box 5300, Florence, SC 29502-5300 

To place an order by phone, call: (803) 665-5676 

10 AM and 5 PM EOT 

Canadian Distributor-Kelly Software 
Australian Distributor-Computer Hut Soltware 



PROCOLOR-FILE 

S 1984 by Oemnger Sollwaie. Inc. 

ENHANCED 2.0 

• 60 Data Fields lor each record 

• 1020 spaces available per record if needed 

• Maximizes multiple drive operation 
•28 equation lines (+-V) 

• IF-THEN-ELSE logic test in equations 

■ Full Screen editing on up to 4 data entry screens 

■ Key click and auto key repeat 

• Stores custom designed report formats 

• Obtain totals, averages, or summaries for any field 

• Output reports to printer, screen, or disk file 

• Send data out to a DYNACALC compatible file 

• Separate label generator for up to 10 across labels 

• Pre-define up to 16 indexes for searching/reporting file 

■ Sorts 750 records in under 5 minutes 

• User defined selection menus 

• Repeated tasks performed with one keystroke 

■ Comes with 75 pages of documentation in a 3 ring binder 

• Supported by a national users group 

• Full time programmer support 

• Supplied on an unprotected disk 



$ 59 
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PRO-COLOR-FORMS 2.0 

1984 by Derringer Software, Inc. 

PRO-COLOR-FORMS will access data files created with 
PRO-COLOR-FILE and merge them with a letter or place them 
on pre-printed forms. 

• STORE UP TO 6 FORMATS • USER DEFINED PAGE SIZE 

• SUPPORTS SPECIAL PRINTER CONTROL CODES -RIGHT 
JUSTIFICATION • PASSWORD PROTECTION ■ MERGES 
WITH GRAPHICS FROM MASTER DESIGN OR 
TELEGRAPHICS • 

PRO-COLOR-DIR 

C 1984 by Oemnger Software. Inc. 

PRO-COLOR-DIR will read your directories and create a 
master data file that can be accessed by PRO-COLOR-FILE 
for sorting and reporting. 1000 + records can be stored on 
one diskette with valuable information about each program. 

You can obtain hard copies of the information and create 
labels of the filenames for placing on the diskette itself. 

• DISK ID NAME • FILENAME/EXT • TYPE OF FILE 

• DATE CREATED • DATE UPDATED • NUMBER OF 
GRANS ALLOCATED • NUMBER OF SECTORS 
ALLOCATED AND USED ■ MACHINE LANGUAGE 
ADDRESSES • 



$2Q95 

FOR BOTH 



DYNACALC 

SPREAD SHEET FLEXIBILITY 

(Includes Dynagraph + Sidewisel 



$79 95 

Telewriter-64. 

$5495 



WORD PROCESSOR POWER 

coco Max II 

GRAPHICS SUPERIOR 



$79 95 



MASTER DESIGN 

1984 by Derringer Software. Inc 

Generates lettering in hi-res graphics that can be different 
sizes, skinny, bold, textured, drop shadowed, raise shadowed 
or tall. Also interfaces with the Telewriter-64 word processor 
for printing hi-res displays with your letters. 

Take full advantage of all the extended BASIC hi-res graphic 
commands including boxes, circles, lines, copy displays and 
utilize GET and PUT features. Added commands include mirror 
reflection, turn displays backwards or upside down. Squish 
displays, create dot patterns for shading or diagonal lines. 

The Letterhead Utility allows you to access hi-res graphics 
from Telewriter-64, your own BASIC programs or 
PRO-COLOR-FORMS. 

Interfaces with dot matrix printers having dot addressable 
graphics. 

See reviews in: 

July 84 Rainbow. Oct. 84 Hoi CoCo 



$2995 



DYNAGRAPH 

1984 by Derringer Software. Inc 

A UTILITY PROGRAM FOR OWNERS OF DYNACALC 
DYNAGRAPH will transfer graphic files from OYNACALC 

to standard graphic files for further enhancing and labeling 

bygraphic editing programs such asMASTER DESIGN, CoCo 

Max or Graphicom. 
DYNAGRAPH can also reduce a graph vertically and 

horizontally so that multiple displays can be combined 

into one. 



$1Q95* 



'included FREE with DYNACALC" 



max Edit 

G 085 Snard Enterprises 

A FONT EDITOR FOR COCO MAX 

• Edit current fonts 

• Create New Fonts 

• Design Symbol Fonts 

• Comes with pre-defined fonts 

• CoCo Max I & II Compatible 



(disk only) 
Written by: Michael W. Shawaluk 
CoCo Max' is a registered trademark ol Colomare. 
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SIDEWISE 

© 1984 by Derringer Software. Inc 

Add a new "twist" to your printer's capabilities! 

SIDEWISE makes your printer do something you never 
thought possible -print side ways! 

SIDEWISE will read in any ASCII text tile and print it out 
side ways using a Radio Shack, Epson, Okidata, C-ltoh or 
Gemini printers having dot-graphics ability. 

SIDEWISE 0S9 is compatible with DYNACALC OS9 and 
requires Basic09 

SIDEWISE 0S9 SQQ95 
(Disk only) v O%J 



SIDEWISE RS-DOS 



$2495" 



' RS-DOS version included FREE with DYNACALC" 
0S9 is a registered trademark ol MICROWARE and MOTOROLA 



TELEGRAPHICS 

6 1984 by Derringer Software. Inc 

PRINT HI-RES GRAPHICS USING TELEWRITER-64! 

Use CoCo Max, Graphicom or other graphics programs to 
create letter heads and print them while using Telewriter-64. 

Telegraphies interfaces with Radio Shack, Epson, Gemini, 
C-ltoh and Okidata printers having dot -addressable graphics. 
A simple modification to Telewriter-64 will allow you to exit 
Telewriter via the DISK I/O MENU and print out the graphic 
without altecting any of your text in the butfer. 

This is the same feature that is included in our MASTER 
DESIGN program. Since we felt you don't need to buy two 
graphics editing programs, we have made this feature available 
at a reduced price. 

(Available Only On Disk) £rr 

Telewriter-64 + TELEGRAPHICS - S64.95 
(SaveS20) 

CoCo Max II + TELEGRAPHICS - S84.95 
(SaveS20) 

NO OTHER DISCOUNTS APPLICABLE 



@ SUMMARY 

1985 Derringer Software. Inc. 

If you use your spreadsheet program to keep track of your 
expenses then ©SUMMARY can help you analyze those 
expenses. For example, if you indicate a "Category" lor each 
expense then @ SUMMARY will produce a report that shows 
a total foi each category, the highest amount, the lowest 
amount and the average amount. In addition, ©SUMMARY 
can produce a hi-res line graph or bar graph of the analysis 
and allow you to place titles on the graph. A hardcopy of the 
graph can also be generated as well as saved to disk. 

The analysis can be saved in a "data file" which can be 
loaded into DYNACALC or read in by @ SUMMARY for future 
additions to the analysis. If you use other Spreadsheets such 
as ELITE'CALC then you have added a graphing feature to 
your spreadsheet applications. The analysis can also he saved 
in an ASCII file which can be read by word processors for 
inclusion in a report. 

@ SUMMARY is compatible with any spreadsheet program 
that can generate an ASCII text file of worksheets. 

Specily RS-OOS 

0I0S3' 



'0S9 version does not 
have Hi-Res graphing 
and requires Basic09. 



(disk only.i 



$1995 



DYNACALC is a registered trademark ol Computer Systems Center 

EUTE'CALC is a trademark ol Elite Sollwaie 

0S9 is a registered trademark ol MICROWARE and MOTOROLA 



Check, Money Older, VISA or MasterCard Include S3.00 for UPS Shipping - S5.00 U.S. Mail - S9.00 Air Mail South Carolina residents add sales tax. 



In either case, the granule is flagged as 
available for new files. 

If a byte in the GAT is equal to a 
number from zero through 67 ($0 
through $43), it means that the granule 
is occupied by a given directory file, that 
this granule is not the last granule in the 
file, and the next granule in the file is 
the granule number corresponding to 
the number in that byte. As a result, if 
the directory entry says the first granule 
in a file is Granule S1E and Byte S1E 
in the GAT reads Hex 1 F, that means 
granule $1F is the next granule in the 
file, and Byte $ 1 F of the GAT must now 
be looked at to learn more about where 
the file resides. 

If the byte in the GAT reads $C1 
through $C9, it means the correspond- 
ing granule is the last granule in the file, 
and the number of sectors in the granule 
that actually belong to the file is the low 
order Hex digit of the number in the 
GAT byte. That is, if we look at Byte 
$IF from the example of the last para- 
graph and find it contains $C4, it means 
the file in question occupies a total of 
two granules, granules 1 E and 1 F, and 
Granule IF actually has only the first 
four of its sectors used for the file (the 
remaining five would be wasted). 

Note that the smallest file in Disk 
BASIC must occupy a whole granule, 
even if it is only one byte long. The rest 
of the granule in question is wasted. 
Note that if a GAT byte is equal to any 
number besides SFF, 00 through $43, or 
SCI through $C9, it means the GAT 
itself has an error in it! The Disk BASIC 
manual alleges that SCO is a valid code 
for a GAT byte, but 1 can see no use for 
that value. (If a reader can explain to 
me the significance of a SCO GAT byte 
value, I'd appreciate it.) For now, I can 
only assume the Disk BASIC manual is 
in error on this matter. 

To fully know exactly where the file 
ends, we now need to hop back to look 
at the directory entry for the number of 
bytes in the last sector of the file that 
are actually used. You now can see that 
the specification of what bytes on the 
disk corrrespond to a given file is 
smeared out between the directory entry 
for that file and the GAT. In the GAT, 
the file size has to be determined by 
tracking down the file from GAT byte 
to GAT byte, until the end of what 
programmers call the "linked list" of 
bytes is reached. And finally, after 
finding the last granule and last sector 
in that granule, one has to go back to 
the directory entry to find where the last 
used byte is in the last sector. 

What a mess! Why did they do it that 



way? Despite the mess, there is some 
method to this madness. Grouping all 
the information concerning which gran- 
ules are used and which are not into one 
single block, they facilitate keeping 
track of available space on the disk and 
make killing of old files easier to do. 
Though there are some ways in which 
the scheme is needlessly complex, it 
actually makes more sense than it seems 
to upon first glance after you start 
considering how disk operating systems 
and file managers have to be written. 

Killed Files 

When you kill a file using Disk basic, 
the actual file data is not immediately 
destroyed. What happens is the first 
byte in the name of the file in the 
directory is set to zero, and all bytes in 
the Granule Allocation Table, which 



"The best disk 
zappers use a 
technique to 
display at the 
same time both 
the ASCII value 
and the Hex value 
of at least a 
selected byte in 
the sector." 



correspond to bytes in that file, are set 
to SFF (= available). Thus, if you kill 
a file, all data in the file remains on the 
disk. Only the information in the GAT 
needed to find such data is destroyed by 
the KILL command itself. 

Of course, if you try to SAVE any new 
data to a disk after killing a file, you 
may end up writing over granules that 
were previously a part of the killed file, 
or even writing over the old killed 
directory entry as well. At that point, 
the file data in the killed file is com- 
pletely destroyed. But, if you have 
merely killed a file and then want to 
restore it, such restoration is possible, 
though often tedious. 

As you add files to a fresh, formatted 
disk. Disk BASIC is inclined to assign 
granules to each new file in a fashion 
that starts on one side of the dirctory 
and tends to alternate on either side of 



the directory track. Therefore, files 
under Disk BASIC tend to get assigned 
near the middle of the disk and grow 
towards both the center and the outer 
edge. 

However, some disk utilities (such as 
Spectrum Projects' Directory Uliltiiy) 
assign granules sequentially from Gran- 
ule to Granule 68; disks that have had 
many files written to them, then erased, 
then others written to them, tend to 
have the granules that compose a given 
file scattered all over the disk. This can 
make reconstruction of a big killed file 
on such a disk very difficult. 

File Structure 

Now that you know how to find a 
given file, from its first to last byte on 
the disk, I'll explain what you can 
expect to see in the three most com- 
monly encountered Disk BASIC files. 

ASCII 

ASCII text files ("basic text files") 
are the easiest of all to understand. 
These files have the File Type flag set 
to one and the ASCII flag set to SFF. 
They are almost totally "raw" data — 
just byte after byte of information, 
usually (though not necessarily) ASCII 
text. The only thing special about them 
is the last byte in the file is Hex 1A 
(control Z). This is the flag that marks 
the end of an ASCII text file. Within the 
file the bytes are typically less than a 
Hex value of S80, but are not required 
to be so. Thus, the only special "struc- 
ture" such a file has is that it will not 
have any SlA's in it until the last byte 
of the file. 

Tokenized BASIC 

Tokenized BASIC files are a kind of 
binary file. They have a File Type flag 
of zero and an ASCII flag of zero as 
well. Looking at them in ASCII, you 
will be able to recognize all the text that 
is in the BASIC program, but all BASIC 
key words are encoded ("tokenized") 
into one or two bytes. Line numbers do 
not appear as ASCII, but as two Hex 
bytes. 

For example, the line 257 PRINT 
"ABC" appears in the file as the follow- 
ing sequence of bytes: 00 (a line delime- 
ter), 0101 (the two-byte Hex value for 
257 decimal) followed by Hex 80 (the 
BASIC token code for PRINT), then Hex 
22 41 42 43 22, the ASCII codes for 
"ABC". Because no BASIC token is set to 
00, and 00 is a mil (not used to encode 
ASCII letters and symbols), you will 
never find inside the tokenized BASIC 
file more than two 00 bytes in a row. 
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However, at the end of the file, you will 
find three 00 bytes. This is BASIC'S "end 
of file flag." If you are in the process of 
reconstructing a disk after losing the 
GAT on it (an utterly thankless task. . . 
let me tell you!), your reconstruction of 
a given BASIC file is aided by your search 
for the sector with BASIC code and three 
00 bytes. 

Occasionally, you might encounter 
what appears to be a normal BASIC file 
that has two sets of three 00 bytes in it. 
This most likely is an especially pre- 
pared "end packed" BASIC file, made up 
by programmers to stuff machine lan- 
guage code invisibly at the end of a 
BASIC file. Such files are not normal 
BASIC files and have been "foxed with" 
by the programmer. 

Machine Language Files 

These are by far the the most compli- 
cated files of all. This is due to the 
provision Microsoft made for "seg- 
mented" binary files. That is, an ML file 
on a disk (unlike its counterpart on a 
tape) can consist of several segments 
that load in different areas of memory. 
Let's start with the description of a non- 
segmented ML file, then go on from 
there. 



Non-segmented ML Files 

The SflVEM command generates non- 
segmented ML files. Note that the 
SfiVEM command cannot generate a 
segmented ML file; those are created 
using various editor/ assemblers or by 
foxing with the file as it resides on the 
disk using a disk zapper. Such non- 
segmented ML files (actually they are 
segmented files that have only one 
segment) begin with a 00 byte. This is 
followed by two bytes that specify 
number of ML data bytes, then by two 
more bytes that specify where the ML 
data is to start loading into memory. 
This five-byte "header" is followed by 
the M L data itself. At the end of the file 
is a five-byte ending sequence, consist- 
ing of an SFF byte, two bytes of 00 each, 
then two bytes that specify the execute 
address of the file. 

For example, if you made a file using 
SflVEM "TEST" &H432I, &H4324, 
&H4322, and if $4321 through S4324 
contain the Hex values Al, B2, C3 and 
D4 at the time you save the file, it 
appears on the disk (in Hex) as follows: 
00 00 04 43 2 1 (the five-byte header with 
the 00 flag byte, the length of the file as 
S0004 and the start address of $4321), 
followed by Al. B2, C3, D4 (the actual 



data in the file itself), followed by the 
end five bytes of FF, 00, 00, 43 and 22. 
Note carefully that the end address is 
not specifically stored as such on the 
disk in the file header. It must be 
calculated from the start of load address 
and the file length. Also note that you 
must track the file down to its end 
before you can tell what its execute 
address is. 

Segmented ML Files 

Segmented ML files are very similar, 
but after the first segment, instead of 
having an FF 00 00 (execute address) 
five-byte end flag, they have another 
header, specifying more data to be 
loaded elsewhere in memory. There is 
no limit (other than the memory of the 
CoCo and the size of the disk) on how 
many segments such a file can have, so 
it is possible to create an ML file that 
loads single bytes all over the memory 
of the CoCo. In these segmented files 
the end is recognized by the presence of 
the FF end flag followed by the 00 00 
(execute address) five-byte final block. 
Thus, a segmented ML file can have lots 
of start and end addresses, though it can 
only have one execute address. 

This segmented structure can be a bit 
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confusing, but it is very convenient for 
assemblers! And, it is helpful when you 
need to make a program that loads stuff 
in differing and widely separated areas 
of memory. Such segmented files are 
easily created with EDTASM and with 
Macro 80C (and probably most other 
editor/ assembler packages) using more 
than one ORG statement in the source 
code. Indeed, some assemblers that 
assemble directly to disk, like Macro 
80C, create segmented files even when 
assembling source code that is not 
multiple DRGed. In such cases, the end 
address of one segment will be seen to 
be one less than the start address of the 
next. 

References 

Disk BASIC Unravelled, published by 
Spectral Associates, is the bible for ML 
disk hackers. Indeed, I'd go so far as to 
say that if you do any assembly lan- 
guage hacking using Disk BASIC, you 
need to buy the three-volume BASIC 
Unravelled (cost is about S50). This set 
has fully commented disassemblies of 
all versions of the CoCo ROMs, gobs 
of information about the RAM-base 



page and such, stuff on file formats, 
BASIC routine entry points, and the like. 
It is what Microsoft and Tandy should 
have published the day they released the 
CoCo on the market. Spectral Asso- 
ciates and the unnamed ML hacker(s) 
who compiled this set deserve the 
thanks of all CoCo users. 

The Disk Extended BASIC Manual 
comes with your Radio Shack disk 
Drive 0. This manual can be ordered 
separately, although only the few pages 
in Chapter 1 1 are of relevance to what 
is written here. 

The Disk Analyzer Program 

The following simple BASIC program 
automatically searches out all the infor- 
mation needed to find every byte in a 
given valid file on a Disk BASIC disk. It 
dumps that information to a printer; 
you can also have it go to the screen by 
changing Line 50 from D=-2 to D=0. If 
you do this, you'll want to add some 
kind of pause feature as the data oth- 
erwise scrolls by too quickly to read. 
Just load the program, type RUN, put the 
disk you want to analyze in Drive 0, 
make your printer ready and press any 



key. All text is printed in ASCII char- 
acters and all numeric values are printed 
in Hex. 

Analyzer prints four lines of informa- 
tion about each file on your disk. 

First line: Filename, extension, File 
Type Hag byte status, ASCII flag status 
(an asterisk [*] precedes any killed files 
on your disk that this Analyzer will see 
and list). 

Second line: The numbers of all the 
granules that compose the file, from the 
first to the last. If invalid granule 
numbers are detected, the program 
indicates this by a'*' and/ or by printing 
in the next line "scrunched GAT!" 

Third line: The number of sectors in 
the last granule. 

Fourth line: The number of bytes in 
the last sector. 

This program gathers together all the 
widely separated data into one table for 
you to refer to when you are wandering 
around your disk using a disk zapper. 
Note that Analyzer does some testing 
for messed up entries, but on a disk with 
blown directory entries it won't be of 
much use. □ 
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The listing: ANALYZER 



300 95 

470 48 

920 72 

END 163 



10 CLEAR 2000 

20 DIM G(69) 

25 CLS: PRINT" (C) MARTY GOODMAN 1 

985": PRINT 

30 PRINT" DIRECTORY ANALYZER" : PRI 

NT: PRINT "PREPARE PRINTER" : PRINT: 

PRINT"HIT ANY KEY TO CONTINUE" 

40 IF INKEY$="" THEN GOTO 40 

50 D=-2 

70 PRINT#D,"* INDICATES A KILLED 

FILE WHEN IN FRONT OF FILE NAME 
it 

80 PRINTED,"* INDICATES INVALID 
GAT ENTRY IN GAT LISTING" 
90 PRINT#D, "KILLED FILES THAT AR 
E NOT LISTED AS 'SCRUNCHED GAT 1 
HAVE MOST LIKELY" 

92 PRINT#D,"BEEN WRITTEN OVER BY 
A NEW FILE AND ARE REALLY LOST! 
ii 

95 PRINT#D,"":PRINT#D,"" 
100 REM READ IN GAT 
110 DSKI$ 0,17,2,A$,B$ 
120 FOR N=l TO 68 



130 G(N)=ASC(MID$(A$,N,1) ) 

140 NEXT N 

200 REM ANALYZE DIRECTORY 

210 S=3 

250 DSKI$ 0,17,S,A$,B$ 

300 REM MAIN LOOP 

305 IF LEN(A$)=0 THEN '.GOTO 5000 

307 K=0 

310 T=l:GOSUB 2000: IF E$=CHR$(&H 

FF) THEN GOTO 9000 

3 20 IF ASC(E$)<>0 THEN GOTO 3 50 

325 K=l 

335 PRINT#D,'»* "j 

3 50 T=8:GOSUB 1000 : PRINT#D, E$ ; : P 

RINT#D,"/"; 



T=3:GOSUB 1000 : PRINT#D, E$ ; 

T=l:GOSUB 1000 

E=ASC(E$) 

THEN GOTO 410 

THEN GOTO 4 20 

THEN GOTO 4 30 

THEN GOTO 440 



IF E=0 
IF E=l 
IF E=2 
IF E=3 



3 60 

370 

375 

380 

385 

390 

395 

400 PRINT#D," 

GOTO 450 

410 PRINT#D," 

GOTO 450 

420 PRINT #D," 

GOTO 450 

430 PRINT#D," 

GOTO 450 



BAD FLAG BYTE " ; 
BASIC program "; 
BASIC data file"; 
Mach Lang progm" ; 



90 



THE RAINBOW March 1986 



44$ PRINT#D," Txt Ed src file"; 

4 5$ PRINT#D," ";:T=1:G0SUB 1$$ 

$:E=ASC(E$) 

4 6$ IF E=$ THEN GOTO 48$ 

465 IF E=255 THEN GOTO 49$ 

47$ PRINT#D," *BAD* " : GOTO 5$$ 

4 8$ PRINT#D," BINARY": GOTO 5$$ 

49$ PRINT#D," ASCII " 

5$$ REM ANALYZE GAT ENTRIES 

51$ T=l:GOSUB 1$$$ :E=ASC (E$) 

515 COMMA=$ 

52$ REM GAT LOOP 

525 GOSUB 3$$$ 

53$ IF V=$ THEN PRINT#D," *" : GOT 

89$ 

54$ IF V=2 THEN GOTO 8$$ 

545 IF COMMA=$ THEN GOTO 55$ 

547 PRINT#D,","; 

55$ G$="$$$$":G$=G$+HEX$(E) :G$=R 

IGHT$(G$,2) :PRINT#D,G$; 

56$ COMMA =1 

57$ E=G(E+1) :GOTO 52$ 

8$$ REM CHECK SECTORS USED IN 

LAST GRAN 

81$ PRINT#D,"":PRINT#D,E AND &H$ 

F;" = # OF SECTORS IN LAST GRAN 
ii 

82$ GOTO 9$$ 

89$ PRINT#D, "SCRUNCHED GAT!" 

9$$ REM CHECK BYTE COUNT IN LAST 

SECTOR AND LOOP 
91$ GOSUB 1$$$ 

915 B=ASC(E$):IF B>1 THEN GOTO 9 
8$ 

92$ T=l: GOSUB 1$$$ 

925 BC=256*B+ASC(E$) :IF BC>256 T 
HEN GOTO 98$ 

93$ PRINT#D,HEX$(BC) ;" = # OF BY 
TES IN LAST SECTOR" 
94$ T=16: GOSUB 1$$$ 
945 PRINT#D,"" 
95$ GOTO 3$$ 

98$ PRINT#D,"BAD BYTE COUNT ENTR 
Y!":GOTO 94$ 
1$$$ REM TRIM OFF LEFT AND GET 
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SUBSTRING 

1$$5 E$=LEFT$(A$,T) 

1$1$ A$=RIGHT$(A$,LEN(A$)-T) :RET 

URN 

2$$$ REM GET LEFT STRING 

2$1$ E$=LEFT$(A$,1) : RETURN 

3$$$ REM CHECK FOR VALID GAT ENT 

RY 

3$$5 V=l 

3$1$ IF E<68 THEN RETURN 

3$2$ IF E>&HBF GOTO 3$4$ 

3$ 3$ V=$: RETURN 

3$4$ IF E>&HC9 THEN GOTO 3$3$ 

3$ 5$ V=2: RETURN 

5$$$ REM CHECK FOR MORE DATA IN 

B$ OR IN NEXT SECTOR 

5$1$ IF B$<>"" THEN A$=B$:B$="": 

GOTO 3$$ 

5$2$ S=S+l:GOTO 25$ 

9$$$ REM ALL DONE 

9$1$ SOUND 1$$,2$:CLS:PRINT@27$, 

"DONE" 

9$2$ END 

1$$$$ REM GAT DISPLAY 

1$$1$ PRINT#D, :PRINT#D, :PRINT#D, 

" ' GRANULE ALLOCATION TABLE LIS 

TING" 
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DYNAMIC COLOR NEWS 
A monthly Newsletter with Educational ma- 
terial for writing Programs, New Products, 
Product Reviews, Programs, and much more, 
SI 5 yr . - Free Sample - 

RROC3RAM SAVER 

Uninterrupted Power Source (UPS) provides 
power to RAMS during power failures. For 
all computers with 5 Volt RAMS. *59.95 

MEMORY EXRANDERS 

We have several types of solderless memory 
expanders from &4K to 512k. Call or write 
for details. 

MEMORY MANAGER 

(New Product) 
Software designed to manage the second 32K 
memory bank for 64K computers. Run basic 
programs in both banks, store programs in 
the second bank, link programs from one 
bank to the other. Allows copying ROMS to 
RAM and stacking programs in the upper 
memory. 427.95 Cassette, S29.95 Disk. 

SOFTWARE 

DVTERM 300-2400 baud terminal Pgm. *14.95 

DISASM Decimal 6809 Assembler *19.95 

MPM Stack up to 5 programs in 32K 814.95 

Checks, Visa & MC Cards. Add *3 ship. 

Free Catalog. 24 Hour phone. 

DYNAMIC ELECTRON I CS 
BOX SS*^ (205) 773 — 2VSS 
HARTSELLE , AL ZSS£>-4-0 
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PROGRAMMING UTILITY 
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VARLIST: 

A Quick and Easy Way 
to List Program Variables 



F 'artist, a utility program that 
lists all variables, will lend some 
help with those pesky problem 
programs that you just can't get to work 
properly. 

Let's look at an example. 1 once had 
a program with a variable called LNC 
(for "Line Count"); it also had another 
variable named LND (for "Line De- 
scription"). The program just didn't 
work as anticipated. Of course, in 
hindsight I realized the error of my 
ways: Only the first two characters are 
significant in a variable name. The 
program treated LNC and LND as the 
same variable! 

Now, if I only had a utility tool that 
could tell me all the lines containing 
LNC and LND. I didn't have such a 
tool, and it took me an agonizingly long 
time to go through every line of the 
program to change one of the variable 
names so it was different from the other. 

1 decided then that someday I would 
write such a utility program. Varlisl is 
the result, and I would like to share it 
with other CoCo friends. It lists all the 
numbers of the lines in which variables 
appear; in fact, if a variable appears 
twice, it is listed twice. In addition, it 
also highlights all the jump statements, 
i.e., GOTO, GOSUB, THEN and ELSE. 

Do You Like BASIC'S Beauty? 

This program is written entirely in 
BASIC. As you can imagine, it does not 

Hans Schulz works for a major Cana- 
dian bank in West Hill, Ontario. He is 
involved in planning the installation 
and upgrading of banking terminals in 
the bank's nationwide branch network. 



By Hans Schulz 

exactly race through the target pro- 
gram, but it lets you know where it is 
at all times. In the interest of preserving 
some processing speed, I have kept the 
REMarks to a bare minimum and have 
eliminated unnecessary spaces wherever 
possible. A program line without spaces 
between BASIC statements and variable 
names may look strange at first sight, 
but you will get the drift of it. 

Are You in a Hurry? 

POKE 65495,0 will increase your 
processing speed, but if you are really 
impatient, insert lines 50001 and 50601 
into Varlisl for additional speed (see 
Listing 2). However, you lose the screen 
display during this speed up. 

Do You have Enough Memory? 

Varlist uses approximately 9,000 
bytes (9K) of RAM. The program 
changes the standard PCLERR4 when 
you first turn on the CoCo to PCLEAR1, 
which only reserves one page of graph- 
ics memory (1,536 bytes). If you have a 
lengthy target program you may have to 
free up some additional memory to fit 
both Varlist and your program into the 
available RAM space. To get at the 
extra 1,536 bytes, you have to perform 
the equivalent of a PCLERR0, which, as 
you may know, is not a valid BASIC 
command. It can be summarized as 
follows: When you first power up your 
CoCo, type POKE &H19,6:NEU and 
press ENTER. In this case, you should 
also remove the PCLEAR1 statement 
from Line 50010. 

How do You get the Program to Work? 

First key in Varlist and CSRVE a copy 



of it, then make sure there are no typing 
errors by testing it with RUN 50000. It 
will list the variables in the test program 
(lines 10 through 90). Correct typing 
errors, if any, and CSRVE a corrected 
copy of Varlist. Now delete lines 10 
through 90. 

Make sure the program for which you 
want to produce the list of variables 
does not have any line numbers greater 
than 49999 and, if necessary, renumber 
it. Merge your program with Varlist. 
Now type RUN 50000 and press ENTER. 
The screen will display the line numbers 
of your program, which Varlist is scru- 
tinizing as it steps through the program 
line by line. 

How does Varlist Work? 

Line 50010 reserves 1,500 bytes of 
memory for string variables and re- 
serves space for 500 variable names and 
500 line numbers; it also releases three 
pages of graphics memory. (When you 
turn on your CoCo it automatically 
PCLEflRs four graphics pages.) Then the 
screen is cleared. 

Line 50030 finds the starting address 
of your BASIC program in memory, 
regardless of whether you have a I6K 
or 32K CoCo. (This may be useful for 
future reference.) 

Line 50040 initializes the variable PO 
(the pointer address of the beginning of 
the next line) and variable LI (the 
current line number being worked on). 
Line 50570, processed in the GOSUB 
statement, displays the line number 
being examined on the screen. If the line 
number is greater than 49999 then the 
program has reached Varlist and the 
end of your target program, in which 
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CoCo's Best & Fastest Spreadsheet System 

ACCLAIMED BY THE EXPERTS 

"DYNACALC is my choice for a CoCo spreadsheet." 
Dan Downard, RAINBOW, September, 1984. 
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"Eat your heart out, Lotus 1-2-3!" 
Scott Norman, HOT CoCo, October, 1984. 

Built-in Features: 

51 x 24 Display with Lower Case 

Super-fast Smart Screen Refresh 

Auto-Repeat Keyboard Driver 

Keysaver (TM) repeats last command x times 

Disk Operating System (works just like ROM DOS) 

Easy communication with BASIC/DOS programs 

Two-way communications with PRO-COLOR-FILE * Enhanced* 

Outputs to ASCII Word Processors like Telewriter-64 

Fast 16-Digit Arithmetic with Scientific Functions 

Summation, Mean, and Standard Deviation Functions 

Logical Functions with String & Numeric Comparison 

String locate command to navigate large worksheets 

Sort full or partial worksheet by columns or rows 

Line, Bar, Hi/Lo/Close, Circle Graphs 

Full Graphics captioning and overlay facility 

Graphics Drivers for all popular Printers 

Joystick/Mouse Driver for Cursor Movement 

Works with any ROM versions, even JDOS 

33k Available Worksheet Space 

Up to 256 Columns or 256 Rows 

Can use VisiCalc worksheets & training materials 

On-screen Help Messages 

FOR 64K DISK SYSTEMS 
available from 
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CANADA-CDN $129.95 
DATAMAN international 
420 FERGUSON AVE. N. 
HAMILTON, ONT. L8L 4Y9 
(416) 529-1319 AUSTRALIA 

PARIS RADIO 

161 BUNNERONG RD. 

KINGSFORD 2032 NSW 

(612) 344-9111 




COMPUTER SYSTEMS CENTER 

42 Four Seasons Center #122 
H^ec Chesterfield, MO 63017 USA 
)fl£5B-~ (314) 576-5020 

10 to 6 Mon.-Fri. 

or your local DYNACALC dealer 

Price US$99.95 
Outside North America add $10 postage 

DYNACALC Reg. U. S. Pat. Off. 

Lotus and 1-2-3 are trademarks of Lotus Development Corp. 

PRO-COLOR-FILE is a trademark of Derringer Software 

Telewriter-64 is a trademark of Cognitec 

VisiCalc is a trademark of VisiCorp. 
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• Menu oriented 

• Upload/download. Ascn 
01 XMODEM piotocol 

• Execute OS-9 commands 
from within XTERM 



XTERM 

OS-9 Communications program. 

• Delinable macro keys 

• Works with standard serial port. RS232 
PAK.orPBJ2SPPack Includes all drivers. 

• Works with standard screen XSCREEN, or 
WORDPAK 80 column board 

$49.95 with source $89. 95 



XMENU 



Creates a menu driven environment (or OS-9 
• Create your own menus • Works with standard screen. 

^ XSCREEN. WORDPAK. O-PAK 

$29.95 with source S59.95 



OS-9 hi-res screen 
51/64/85 chars per line • Easy menu operation 

$ I 9.95 wilh source S39.95 



XDIR & XCAL 



Hierarchial directory 

• Full sorting 

• Complete pattern matching 

$24.95 with source $49.95 



OS-9 calculator 

• Decimal, Hex, Binary 

• +. -. ". /. AND. OR. XOR. NOT 



OS-9 disassembler 

$34.95 
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XWORD 



OS-9 word processing system 

• Works with standard text screen, XSCREEN. WORDPAK. or O-PAK 

• True character oriented lull screen editing 
■ Full block commands 

• Find and Replace commands 

• Execute OS-9 commands (rom within 

• Proportional spacing supported 

• Full printer control, character size, emphasized, italics, overstnke. underline, 
super/sub-scripts 

• 10 header/looters 

• Page numbering in decimal or Roman numerals 

• Margins and headers can be set different lor even and odd pages 

$69.95 with source S124.95 



Mail merge capabilities lor XWORD 
$24.95 with source S49.95 



OS-9 spelling checker, with 20000 and 40000 word dictionaries 

$39.95 
XTRIO 

XWORD/XMERGE/XSPELL 
$11 4.95 with XWORD/XMERGE source $199.95 



OS-9 lull screen editor 
$39.95 wilh source S79.95 



AND FOR RS DOS 



SMALL BUSINESS ACCOUNTING This 
sales-based accounting package is designed lor 
the non-accounting oriented businessman. It also 
contains the llexibilily lor the accounting oriented 
user to set up a double entry |0urnal with an almost 
unlimited chart ol accounls. Includes Sales Entry, 
transaction driven Accounts Receivable and Ac- 
counts Payable, Journal Entry, Payroll Disburse- 
ment, and Record Maintenance programs. System 
outputs include Balance Sheet, Income Statement, 
Customer and Vendor status Reports, Accounts 
Receivable and Payable Aging Reports, Check 
Register, Sales Reports, Account Status Lists, and 
a Journal Posting List. $79.95 



ACCOUNTS RECEIVABLE Includes detail- 
ed audit trails and history reports lor each customer, 
prepares invoices and monthly statements, mailing 
labels, aging lists, and an alphabetized customer 
listing. The user can deline net terms tor commer- 
cial accounts or tinance charges lor revolving 
accounls. This package (unctions as a standalone 
A/R system or integrates with the Small Business 
Accounting package. $59.95 



These programs are user Inendly and menu 
dnven. Sample transactions are included. Each 
package (eatures a hi-res screen. Each requires 
a printer, a minimum ol 32k and at least 1 disk 
drive. 



PAYROLL Designed for maintaining personnel 
and payroll data for up to 200 hourly and salaried 
employees with 8 deductions each. Calculates 
payroll and tax amounts, prints checks and main- 
tains year-to-date totals which can be automatical- 
ly transferred to the SBA package. Computes each 
pay period's totals lor straight time, overtime and 
bonus pay and determines taxes to be withheld. 
Additional outputs include mailing list, listing o) 
employees, year-to-date federal and/or state tax 
listing, and a listing ol current misc. deductions. 
Suited (or use in all states except Oklahoma and 
Delaware. $59.95 



DMS Database Management System Search, 
sort, calculated (ields, disk and tape inter- 
laces. $24.95 



CBK Complete check register with statement 
balancing. Includes lull amortization program and 
wage analysis program. $24.95 



AUT085 Hi-res screen. 51/64/85 characters 
per line, inverse characters, automatic line 
numbering. $19.95 
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MICROTECH 
CONSULTANTS 

■ ifcjf* 1906 Jerrold Avenue 

■ WWaSt. Paul, MN 55112 
Dealer Inquiries Invited 

. OS-9 is a trademark of Microware 



Ordering Information 

Add $3.00 shipping & handling, MN residents add 6% sales tax 
Visa. Mastercard. COD (add $2.50). personal checks. 



(612)633-6161 





Table 1 




Sample 


Output: 


Variab 


les and J 


umps in Varlist 


50010 


LA$( 


SUB) 


5,0j31j3 


LR(SUB) 


50030 


N 




50040 


gosub 50550 


5^j34j3 


goto 


50090 


50060 


gosub 50520 


50070 


C 




50070 


N 




50070 


N 




50070 


gosub 50550 


50080 


gosub 50520 


50080 


C 




50080 


then 


50080 


50090 


N 




50090 


PO 




50090 


C 




50090 


PO 




50090 


N 




50090 


N 




50090 


goto 


50070 


50100 


c 




50100 


N 




50100 


then 


50080 


50110 


C 




50110 


N 




50110 


then 


50080 


50120 


C 




50120 


N 




50120 


then 


50080 


50130 


C 




50130 


N 




50130 


then 


50080 


50140 


C 




50140 


N 




50140 


then 


50080 


50150 


c 




50150 


c 




50150 


c 




50150 


c 




50150 


c 




50150 


thengosub 50540 


50150 


goto 


50080 


50160 


C 




50160 


N 




50160 


D$ 




50160 


D$ 




50160 


gosufc 


50410 


50160 


goto 


50090 


50170 


C 




50170 


N 




50170 


D$ 




50170 


D$ 




50170 


gosufc 


50410 


50170 


goto 


50090 


50180 


c 




50180 


D$ 




50180 


gosub 


50410 


50180 


goto 


50090 


50190 


C 




50190 


N 





case all variables have been found and 
the list will be displayed on the screen 
starting at Line 50600. 

As an aid to the general understand- 
ing of Varlist, I let it generate a list of 
the variables used in the Varlist pro- 
gram (see Sample Output, Table I). I 
have also prepared a shortened list of 
the variables, where each variable ap- 
pears only once, and have sorted the 
variables in alphabetical order (see 
Table 2). 

The GDSUB 50520 in Line 50060 reads 
the next character (in ASCII format) 
from the memory location where your 
program is stored. 

Line 50070 is reused again later, and 
if 'C (the character being examined) is 
a zero, it indicates that the last byte of 
the program line has been reached. In 
that case, 'N' (the number of the storage 
location being read) must be decre- 
mented by one to update the address 
pointer (PO) of the next line in the 
G05UB 50550. 

In Line 50080 the next character is 
read (GOSUB 50520). If the character 
('C') is a space, then the process is 
repeated until a non-blank character is 
found. 

If in Line 50090 the address pointer 
of the next line is identified, then PO is 
updated again. 

Lines 50100 through 50140 identify 
some BASIC statements with two-byte 



Table 2 
Short List of Variables 
in Alphabetical Order 

AA$ 

C 

D$ 

I 

1$ 

IM 

IX 

LA 

LA$(SUB) 

LI 

LL 

LR(SUB) 

MN$ 

MX$ 

N 

PL 

PO 

Q 

R 
S 
T 
Z 



tokens and processing continues with 
reading the next character in Line 
50080. Line 50100 identifies a PEEK; 
Line 50110, a USR statement; Line 
50120, an flBS function; Line 50130, an 
ATN function; and Line 50140, an SQR 
function. 

Line 50150 determines when process- 
ing can skip to the next line without 
reading to the end of the current line. 
That can be done when a DATA state- 
ment is encountered (token 134) or a 
REN (token 130), or its equivalent, the 
apostrophe ('), which is tokenized as 
131, and also the LLIST statement 
(token 155) and LIST (token 148). 
GOSUB 50540 accomplishes the skip to 
the next line, after which processing 
continues at 50080 by reading the next 
character. 

Lines 50160 through 50200 are some- 
what self-explanatory: They deal with 
the jump statements (GOTO, GOSUB, 
THEN and EL5E). Only Line 50 1 90 seems 
a little out of place — it identifies the 
two-byte token for RND (255 132). The 
RND token is not of significance to the 
Varlist logic and the program reads the 
next character by branching back to 
50080. Having disposed of the RND (255 
132) token, it can now be deduced in 
Line 50200 that if the current character 
is a token 132, it is part of the two-byte 
token (58 132) representing the state- 
ment ELSE. (Does 58 seem familiar? It 
is the ASCII code for the colon [:], 
which is used by BASIC to separate 
statements on the same line. Quite 
clever, those Microsoft people, using 
the colon as part of the ELSE logic!) 

Now, back to the jump statements. In 
each case a descriptor (DS) is being 
built. This string may contain, for 
example, the word "then" or "else" and 
may conceivably have the word "goto" 
or "gosub" added to it. At this point, a 
subroutine is performed (GOSUB 50110) 
that obtains the line reference number, 
i.e., the line number to which the jump 
statement has been programmed to 
jump. Upon return from the subroutine, 
with the next byte already read, process- 
ing branches back to 50090 to determine 
what to do with this character. 

Line 50210 looks at the letter 'M' 
(ASCII code = 77). This is not an 
ordinary 'M' though, such as an 'M' that 
may be part of a variable name. It is the 
'M' in CLOhDM. The token for CL0AD is 
151, and if the byte following it is the 
letter 'M\ then GOSUB 50520 reads it 
and, immediately afterwards, branches 
back to 50080 to read the next charac- 
ter. At this point Line 50220 discards 
any further tokenized BASIC statements, 
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i.e., ASCII codes greater than 127, and 
branches back to 50080. 

Line 50230 finds out if the character 
read is alphabetic, i.e., if the ASCII 
code is in the range from 65 to 90. 
representing the capital letters A to Z. 
Finally, the program does some real 
work after all the sifting and discarding 
up to this point: The subroutine at 
50300 assembles the variable name, 
starting with the character ('C') just 
read, then adds to it, one byte at a time, 
until the variable name is completely 
assembled. After return from the sub- 
routine, Varlisi branches back again to 
50080 to read the next character. 

Line 50240 tests to see whether the 
character read is a quote ("), which is 
represented by ASCII code 34. Any- 
thing enclosed in quotes is of no interest 
in this program. Therefore, the subrou- 
tine at Line 50270 keeps on reading and 
discarding characters until it finds the 
second of a pair of quotes. The main 
body of this program ends at Line 
50250. where processing loops back to 
read the next character at 50080. 

What do the Subroutines do? 

Varlisi contains the following sub- 
routines, which are each described here. 

1) Skip between Quotes — Line 50260 

2) Build the Variable Name -- Line 
50300 

3) Build the Line Number Reference - 
Line 50400 

4) Peek at the next ASCII Character - 
Line 505 10 

5) Skip to the next Line — Line 50530 

6) Print the List of Variables — Line 
50590 



Skip between Quotes — Line 50260 

As described earlier, this subroutine 
keeps reading and discarding characters 
until it finds the second of a pair of 
quotes (ASCII code34).Thesubroutine 
also checks for reasonable length of the 
string between the pair of quotes. 1 felt 
anything in excess of five lines of 32 
characters (a total of 160 characters) is 
probably in error and designed the 
program to stop in such a case. If this 
does not apply in your program, simply 
change Line 50280 accordingly. 



Build the Variable Name — Line 50300 

When powering up CoCo the sub- 
script (LA) used to identify the labeled 
variable (LAS) has a value of zero. On 
each trip through the subroutine, that 
is, every time a new variable name is 
stored, the subscript is incremented by 
one in Line 50310. In Line 50320 the 
first character of the variable is stored; 
in 50330 the next character is read. 

In Line 50340 the character value of 
zero indicates the end of the current line 
has been reached and it is now time to 
store the current line number (LI) in the 
array LR(LA). This array is used for 
later printing to indicate where each 
variable appears in the target program. 
The program then branches back to the 
beginning of the main routine of the 
program. 

Line 50350 tests to see if the byte 
currently under scrutiny is numeric 
(ASCII codes 48 to 57) or if it is alpha- 
betic (ASCII codes 65 to 90). If it is 
alphanumeric, the byte is appended to 



the array LAS(LA) and processing 
loops back within the subroutine to 
50330 to read the next byte. If the 
character being examined in Line 50360 
is a'S'sign (ASCII code = 36), it is added 
to the variable name and processing 
resumes at 50330, getting the next byte. 

In Line 50370, if the character is an 
ASCII code 40, i.e., the opening bracket 
'(', then the literal "(SUB)" is appended 
to the variable name to show that the 
variable is subscripted. In other words, 
the variable is an array. 

Line 50380 stores the current line 
number being worked on (and presently 
being held in "LI") in the Line Reference 
array, "LR( LA)." 



Build the Line Number Reference — 
Line 50400 

In Line 50410, which is similar to 
Line 50310, the subscript LA is incre- 
mented by one to store the Line Refer- 
ence on each pass through the subrou- 
tine. 

In Line 50420 the line number LI 
presently being processed is stored in 
the Line Reference array, "LR(LA)." 

Line 50430 obtains the next charac- 
ter, and if it happens to be a blank 
(ASCII = 32), the program immediately 
gets the next byte. 

(Mr. Schulz may be contacted with 
questions about his program at 50 
Morna Avenue, West Hill, Ontario, 
Canada M1E2B1, phone 4 16-281-1583. 
When writing, please include an 
SASE.) □ 



Listing 1: VflRLIST 



r 50040 . . 


..151 




50410 .. 


..140 




50380 . . 


...99 




50620 . . 


..167 




50790 . . 


..166 




51020 . 


...15 




END .. 


...89 




I ™ 





10 REM**LINES 10-90 REPRESENT A 

TEST PROGRAM FOR DEMONSTRATION. 

15 FORO=lTOP:IFQ=RT THENGOSUB123 

456789ELSE10 

20 S3=T3+U:V(W)=X3 

25 NEXT Y: REM Q$ 

30 IFZ=5 THEN10ELSEGOTO13498 

35 A3(56)=1:B345=2:C4444=3 

4)3 IF PEEK(DT)=4 THEN POKE ER,1 

45 'III 

50 IFF=3THENG=9ELSEGOTO10 

55 IF H=I THENGOSUB10:GOTO 1)3 'R 



EAD & END 

6)3 PRINT "A= II ;J;" A3=";K3;" 

";L(M) ;"=ARRAY R" : RETURN 

65 READ N$:END 

7)3 DATA A,A3,B 

9)3 LIST 

50000 i ************************ 

* VARLIST * 
*(LIST OF ALL VARIABLES)* 
*FOR THE COLOR COMPUTER * 

* BY HANS SCHULZ (1984) * 
************************* 

50010 CLEAR1500 : PCLEAR1 : DIM LA$ ( 

500) ,LR(500) :CLS 

50020 '***INITIALIZE*** 

50030 N=PEEK(25)*256+PEEK(26)-1 

50040 GOSUB50550:GOTO50090 

50050 '***READ THE FILE*** 

50060 GOSUB50520 

50070 IFC=0THENN=N-1:GOSUB50550 
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50080 GOSUB50520:IFC=3 2THEN50080 

50090 IFN=PO ANDC=0THENPO=PEEK(N 

+1)+PEEK(N)*256:GOTO50070 

50100 IF(C=134ANDPEEK(N-2)=255)T 

HEN50080 

5)811)8 IF(C=131ANDPEEK(N-2)=255)T 

HEN50080 

50120 IF(C=130ANDPEEK(N-2)=255)T 

HEN50080 

5)813)3 IF(C=148ANDPEEK(N-2)=255)T 

HEN50080 

50140 IF(C=155ANDPEEK(N-2)=255)T 

HEN50080 

5)315)3 IFC=134ORC=130ORC=131ORC=1 

55ORC=148THENGOSUB50540 : GOT05)3j38 



50160 IF(C=165ANDPEEK(N-2)=129)T 

HEND$=D$+"goto ,, :GOSUB50410:GOTO5 

0090 

50170 IF(C=166ANDPEEK(N-2)=129)T 

HEND$=D$+"gosub" : GOSUB50410 : GOTO 

50090 

50180 IFC=167THEND$="then" :GOSUB 

50410:GOTO50090 

50190 IF(C=132ANDPEEK(N-2)=255)T 

HEN50080 

50200 IFC=132THEND$="else" : GOSUB 

50410:GOTO50090 



5,0210 IF(C=151ANDPEEK(N)=77)THEN 

GOSUB50520 : GOTO50080 

50220 IFO127THEN50080 

5)3230 IF(C>64ANDC<91)THENGOSUB50 

310:GOTO50080 

50240 IFC=34THENGOSUB50270:Q=0:G 

OTO50080 

50250 GOTO50080 

50260 '***SKIP BETWEEN QUOTES*** 

50270 GOSUB50520:Q=Q+1:IFCO34TH 

EN50270 

50280 IFQ>160THENPRINT"CKECK FOR 

PAIRED QUOTES " : STOP 
50290 RETURN 

50300 '*** GET VARIABLE NAME *** 
50310 LA=LA+1 
50320 LA$(LA)=CHR$(C) 
50330 GOSUB50520 

50340 IFC=0THENLR(LA)=LI:GOTO500 
70 

50350 IF(C>47ANDC<58)0R(O64ANDC 
<91)THENLA$(LA)=LA$(LA)+CHR$(C) : 
GOTO503 30 

50360 IFC=3 6THENLA$(LA)=LA$(LA)+ 
CHR$(C) :GOTO503 30 

50370 IFC=40THENLA$(LA)=LA$(LA)+ 
" (SUB) " 
50380 LR(LA)=LI 



DDDDD 

nnnnn 
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COLOR COMPUTERS 



CALL TOLL FREE 1-800-248-3823 



COMPUTERS 



LIST 
PRICE 



OUR 
PRICE 



COMPUTERS 



LIST 
PRICE 



OUR 
PRICE 



26-3136 16K Extended Color Computer 2 . 
26-3127 64K Extended Color Computer 2. 
26-3131 Disk Drive lor Color Computer . 

26-3130 Disk Drive 1 lor Drive 

26-1276 DM P -105 80cps Dot Matrix 

Telewriter 64 Tape 

Telewriter 64 Disk 

VIP Writer 



$119.95 $95 00 26-1070 Model 4D Dsktp 64K 2FD & Dskmt $11 99 00 

219.95 175.00 25-1000 Model 1000 1FD 128K & Dskmt . 999.00 

299.95 240 00 25-1001 Model 1000 1FD & 10 MHD 256K 1999.00 

199.95 169.00 25-3000 Model 1200 1FD & 10 MHD 256K 2499 00 

199.95 169 00 25-3001 Model 1200 2FD 256K 1499.00 

49.95 42.00 25-4000 Model 3000 1FD512K . 2599 00 

59.95 49 00 25-4010 Model 3000 1FD & 20MHD 512K 3599.00 

69.95 59.00 26-3901 Model 600 Port Comp 32K 1 3'^D 1599.00 



89500 
705.00 
1475.00 
1525.00 
1200.00 
1900.00 
2600.00 
1100.00 



SOFTWARE 



PRINTERS 



VIP Database 

VIP Terminal Disk 

VIP Intergrated Software . 
RADIO SHACK Software . 

TOM MIX Software 

SS/DD 10 Pack Diskettes . 



59 95 $ 49.00 

49.95 45.00 

149.95 139.00 

15% OFF 

PLEASE CALL 

21.00 14.00 



EPSON LX-80 Printer $ 369.95 $ 225.00 

EPSON LX-80 Tractor Feed 29.95 25.00 

OKIDATA 182 Printer 299.00 245 00 

STAR SG-10 Printer 299.00 250.00 

C.ITOH 7500 Prownter Printer 289.00 225.00 

BOTEK Serial to Parallel Interlace 59.00 



MONITORS 



ACCESSORIES 



COMREX 12" Green Monitor $ 11 9.95 $ 95.00 

COMREX 12" Amber Monitor 129.95 1 10.00 

COMREX 13" Color Monitor 329 95 285.00 

AMDEK 300A Monitor 199.00 155.00 

VIDEO PLUS Monitor Adaptor PLEASE CALL 



26-3012 Deluxe Joystick (EACH) . . . . 

26-3017 64KRAMKH 

26-3008 Joysticks 

26-1 1 73 DCM-3 Direct Connect Modem 

26-1208 CCR 81 Tape Recorder 



29.95 
59.95 
19.95 
59.95 
59.95 



25.00 
51.00 
16.95 
50.00 
50.00 



ino o"er5 rr.ai oe cnanged at *r.men»n *«thoul noi<c 
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50390 RETURN 

50400 '***GET LINE # REFERENCE** 

50410 LA=LA+1 

50420 LR(LA)=LI 

50430 GOSUB50520:IFC=32THEN5043/3 

50440 IFD$="then"ANDPEEK(N-l) >12 

9THEND$="" 

50450 IFO127THENLR(LA)=0:GOTO5J3 

090 

50460 IF(C<4 8ORO57)THENLR(LA)=0 

: D$=" " : GOSUB503 20 : GOTO50090 

50470 LL=VAL(CHR$(C) ) 

50480 GOSUB50520:IF(O47ANDC<58) 

THENLL=LL*10+VAL(CHR$(C) ) :GOTO50 

480 

50490 LA$(LA)=D$+STR$(LL) 

50500 D$="": RETURN 

50510 '***GET ASCII FOR NEXT C** 

* 

50520 C=PEEK(N) :N=N+1: RETURN 

50530 '***SKIP TO NEXT LINE *** 

50540 N=PO-l 

50550 PO=PEEK(N+2)+PEEK(N+l)*256 

50560 LI=PEEK(N+4)+PEEK(N+3)*256 

50570 IFLI>49999THEN50600ELSEN=N 

+5: PRINT"... LINE #";LI 

50580 RETURN 

50590 '***PRINT THE LIST*** 

50600 PRINT: PRINT" PROCESSING 

COMPLETE . . . " : PRINT 

50610 PL=1 

50620 IFLR(PL)>0THENPRINTUSING"# 

## ##";LR( PL) ;: PRINT" 

50630 IFLA$(PL)<>""THENPRINTLA$ ( 

PL) 

50640 PL=PL+1 

50650 IFPL=FIX(PL/12)*12ANDPL<=L 

A THENPRINT@471, "MORE ...": PRINT 

:GOTO50670 

50660 IFPL<=LA THEN50620ELSE5068 

% 

5J3670 IFINKEY$<>""THEN50620ELSE5 

0670 

50680 PRINT"***END OF LIST***":P 

RINT§4 81,"WHAT WOULD YOU LIKE NO 

W? ..." 

50690 IFINKEY$<>""THEN50700ELSE5 

0690 

50700 CLS : PRINTTAB (25) "ENTER" 

50710 PRINTTAB(3) "PRINT ON YOUR 

PRINTER. .P" 

50720 PRINTTAB (3) "DISPLAY THE LI 

ST D" 

50730 PRINTTAB (3) "SHORT LIST ... 

S" 

50740 PRINTTAB (3) "END THE PROGRA 

M E" 

50750 PRINTTAB ( 22 ) "==> " ; 



50760 I$=INKEY$:IFI$=""THEN50760 

50770 PRINTI$;" <==" 

50780 IFI$="P"THEN50830 

50790 IFI$="D"THEN50610 

50800 IFI$="E"THENEND 

50810 IFI$="S"THEN50880 

50820 GOTO50700 

50830 PL=1 

50840 IFLR(PL)>0THENPRINT#-2,USI 

NG"#####";LR(PL) ;:PRINT#-2,» "; 

50850 IFLA$(PL)<> ,M, THENPRINT#-2, 

LA$(PL) 

508 60 PL=PL+1 

50870 IFPL<=LA THEN50840ELSE5068 

50880 •*** SHORT LIST *** 

50890 PRINT"ONE MOMENT PLEASE . . 

.":PRINT" short list" : FORS=lTO 

LA:FORT=lTOLA 

50900 IFLA$(S)=""THENLA$(S)=" ": 

GOTO50930 

50910 IFASC(LA$(S) )>9 6THENLA$(S) 

=" ":GOTO50930 

50920 IF LA$(S)=LA$(T)ANDSOT TH 

ENLA$(S)=" " 

50930 NEXTTrNEXTS 

50940 FORR=lTOLA 

50950 IFLA$(R)<>" "THENPRINTLA$ ( 

R) ;":";:Z=Z+l:LA$(Z)=LA$(R) 

509 60 NEXTR 

50990 ■ ***ALPHASORT THE LIST*** 

51000 N=Z:S=1 

51010 PRINT: PRINT: PRINT" NO 

W SORTING ..." 

51020 MN$=LA$(S) :IM=S:MX$=MN$:IX 

=S 

51030 FORI=S TO N 

51040 IFLA$(I)>MX$ THENMX$=LA$ (I 

) :IX=I 

51050 IFLA$(I)<MN$ THENMN$=LA$ (I 

) : IM=I 

51060 NEXT 

51070 IFIM=N THENIM=IX 

51080 AA$=LA$ (N) : LA$ (N) =LA$ (IX) : 

LA$(IX)=AA$:N=N-1 

51090 AA$=LA$(S) :LA$(S)=LA$(IM) : 

LA$(IM)=AA$:S=S+1 

51100 IFN>S THEN51020 

51110 FORI=lTOZ:PRINTLA$(I) ;"*»; 

:NEXT 

51120 END 

Listing 2: SPEEDUP 

50001 POKE65497,0'HIGH SPEED 
50601 POKE65496,0:POKE65494,0:SO 
UND128,20:SOUND128,20 'RESETTING 
TO NORMAL SPEED 
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Computerware s Quality Hardware 



Monitors 

NAP Monochroma Monitors 

The 20 mhz band width. 800 line 
resolution, and 80x25 display insure 
a crisp picture. The non-glare screen 
and streamlined style is also attrac- 
tive. Plus— it has audio input! 
Green 12" Amber 12" $109.95 

plus 510 shipping 
ONLY $195!!! 

SAKATA Color Monitor 

Beautiful 13" color display 
with 280x300 line resolution. 
Includes composite video color 
and audio. S195 




Disk Systems 



Includes controller, DOS manual, cabinet, 
power supply, half-size double density 
drive, and all cables. Please specify 
RSDOS or JDOS. Add S10 for the new J & 
M switchable controller with printer port 
and JDOS. For both operating systems, 
add S25 for the HDS switchable controller 
or add S40 for the dual DOS J & M 
switchable controller with printer port 

S279.00 
$309.00 
$389.00 
$439.00 



Single drive, Single sided 
Single drive. Double sided 
Dual drives, Single sided 
Dual drives. Double sided 

Adding On 

Each includes half-sized drive in cabinet 
with extender. 

Single drive, Single sided $169.00 

Single drive. Double sided $199.00 

Controllers 

J&M controller w/JDOS or RSDOS $127.95 
HDS controller w/RSDOS or JDOS $127.95 
J & M controller w/JDOS 

& printer port $137.95 

HDS controller w/RSDOS & J00SS154.95 
J&M switchable controller 
w/JDOS & RSDOS 

and printer port $169.95 



Diskettes 

Disk Head Cleaning Kit 



Supplies 



5-pak $ 8.95 

10-pak S14.95 

$ 9.95 



6 Outlet Surge Protector $19.95 

Protect your investment and organ- 
ize all those cords with this handy 
power strip. The surge protector 
filters power spikes from damaging 
your valuable equipment. Reg. S24.95 



Computerware* is a trademark ol Computerware. 




Put a Monitor on Your CoCo 
with 

The New Universal Video Plus 



We would like you to look at our old Video Plus III) with new eyes. We now call it 
the Universal Video Plus & would dare you to compare it with any other video 
interface. We feel confident that you will see that it is the best product & the best 
buy in CoCo monitor drivers ever! 

Sure, at first glance you will notice that it costs a little more. But look further & see 
how much more you get! The bottom line is that the Universal Video Plus is the 
best bargain available. Here are the important features to consider & compare. 

• The Universal Video Plus works with every CoCo made Easy-to-follow, clear 

instructions are included for every model. 

• All cables (audio & video) are included. There is no need to buy extenders or 

extra cables as required by other drivers. With this consideration, the Universal 
Video Plus is now the most cost effective video interface of all 

• Heavy duty construction, evidenced by sturdy leads & connectors, allows the 

necessary handling for installation without fear of breakage. 

• Shielded audio & video cables insure that no extra RF interference will be 

introduced from the Universal Video Plus, unlike other interfaces. 

• The adjustment pot on the Universal Video Plus makes it easy to optimize the 

video signal for each computer. You don't have to modify your computer to get 
good display! 

• Our advanced design gives the highest quality display— better than any other 

device offered 1 

• Installation is easy. There is no soldering & no dismantling of the RF shield. 

• Thousands of Universal Video Plus' are in use throughout the U.S. Clearly the 

test of time has proven its reliability. 






The Universal Video Plus is backed by the Computerware reputation for 
excellence & service. 




$34.95 



also available. . .while supplies last. . . 

Video Plus I $24.95 

Interfaces the original model ot Color 
Computer to any composite video 
monitor (color or monochrome) 



Universal Video Plus 



Video Plus IIC $34.95 

Interfaces the Color Computer II 
(model 26-3026) with either a color or 
monochrome composite video moni- 
tor. Computer must have video chip 
in socket. 




Joystick 



$19.95 




WICO Joystick Adapter 



Video Clear 

from Computer Assoc. $16.95 

Connects between the computer & TV 
to reduce interference from the 
computer. 

$18.95 



Call or Write to: 



Name 




COMPUTERWARE (619 , 436-35,2 

Box 668 • Encinitas, CA • 92024 



Address 

City 

Yes! Send me your FREE catalog! 
VISA MasterCard 

Card * 

Signature 



_State_ 
CoCo 



-Zip. 



Exp. 



Item 


Formal 


Price 




















Shipping: 6% Calif Sales Tax 
Surface — $2 minimum. COD Add $5 






2% for orders over $100 Shipping - 




Air or Canada — $5 minimum. TOTAL 





5% for orders over $100 
I Checks are delayed for bank clearance 



Now from Falsoft, The RAINBOW MAKER, comes . . 




The monthly magazine that's reader-friendly 

If you're interested in the highly popular Model 100, the Tandy 200, the brand new portable Tandy 
600 or Tandy's new generation of MS-DOS computers — the 1000, 1200, 2000, or the exciting new 
Tandy 3000 — PCM is for you! 

PCM, The Personal Computer Magazine for Tandy Computer Users, is brought to you by the same 
people who bring you THE RAINBOW, the premier magazine for the Color Computer. Need we say more? 

So, if you're ready to add portability or step up to MS-DOS, stay with Tandy and THE RAINBOW family 
by subscribing to PCM! 

FREE PROGRAMS! 

We learned from THE RAINBOW that readers want programs to type in , so each month we bring you 
an assortment of them, including games, utilities, business applications and graphics. 

BARCODE, TOO! 

Also, PCM is the only computer publication in the world (that we know of) that brings you programs 
in bar code, ready to scan into memory with the sweep of a wand ! 

TUTORIALS GALORE 

Add to this our regular tutorials on telecommunicating, hardware and machine language, as well 
as BASIC programming tips and product reviews, and we think you'll find we're one of the most 
informative and fun magazines on the market today. 

So if you're ready to add portability or step up to MS-DOS, stay with Tandy and THE RAINBOW family 
through PCM. 



□ YES! Please send me a one year (12 issues) 
subscription to PCM for only $28.* A savings of 22% 
off the newsstand price. 



Name 



Address 
City 




State 



ZIP 



In order to hold down costs, we do not bill. 

I I My check in the amount of 

Charge to my: I I VISA, I I MasterCard 

Acct. # 



is enclosed. 

I lAmerican Express 

Expiration Date- 



Signature 

"Canadian subscribers add U.S. $7. Surface rate elsewhere $85. Allow 5 to 6 weeks (or first copy. Kentucky residents add 5% sales tax. 
U.S. currency only, please. 

Mail to: PCM, The Falsoft Building, P.O. Box 385, Prospect, KY 40059 



Put your program up in lights . . . 




By Chuck Poynter 



You just wrote a new computer program that will set the 
world on fire — but something is missing. Do your title 
and menu screens lack pizazz? If that is what you need, 
then Marquee should help. 

Listing 1 pokes a machine code program into memory that 
draws and moves a border around the screen. This is actually 
an illusion. What really happens is the graphics characters are 
changed back and forth, and it appears to be moving. The 150 
in Line 50 is the yellow graphics character you start with. It 
changes to 153 during the program, then changes back to 150. 
To get the following colors, change 150 to one of the following 
numbers: red, 182; buff, 198; cyan, 214; orange, 246; blue, 166; 
and magenta, 230. You can use any character code from zero 
to 252. Try these and see the effects. 

There is a title and menu screen in the program starting at 
Line 170. Start your program here and include exec 32000 when 
you want to call the program. The ENTER, T', '2' and l 3' keys 
return to to the BASIC program. If you need more than three 
items in your menu, just break it into two menu screens. 

Listing 2 is the source code for the machine language program. 
This is included so you can see how the program works. Both 

Chuck Poynter is a retired member of the United States Air Force who 
is presently attending college where he is taking computer programming 
courses. He lives in Hector, Arkansas. 



March 1986 THE RAINBOW 



101 



programs are well-documented so they don't need 
extensive explanation. 

(You may contact the author of these programs with 
any questions you have at Box 1 16, Hector, AR 72843, 
phone 501-284-2383. When writing, please include an 



SASE for a reply.) 



^ 



□ 



130 117 

END 201 



Listing 1: MARQUEE 



5 REM*CAN BE PLACED ANY WHERE IN 
RAM CHANGE 32000 TO ANY RAM 
LOCATION ADD 90 TO IT FOR THE 
SECOND NUMBER 

10 FOR 1=32000 TO 32090 

20 READ X 

30 POKE I,X 

40 NEXT I 

45 REM* CHANGE THE 150 IN LINE 50 
TO ANY CHARACTER CODE YOU WANT 

50 DATA 198, 150, 247, 125, 89, 

173, 159, 160 

60 DATA 0, 129, 13, 39, 57, 129, 
49, 39 

70 DATA 53, 129, 50, 39, 49, 129 

, 51, 39 

80 DATA 45, 142, 4, 0, 231, 128, 



T Crr HI AN SOFTrWjARB 

mmiiimiinmffliiiiiiin^^ 



nTiTiTiTiTiTiTiTirornmnTmm 



32K ECB PROGRAMS 

TEACHER PAK PLUS Includes Teacher Pak and CoCo 
Testem described below $47 . 95 

COCO TESTEM Make multiple choice, matching, 
true/false, completion, and short answer 
tests. Requires printer with underline 
ability. Works with tape or disk $19.95 

COCO-LIFE 11 The living patterns game. ... $19.95 

16K ECB PROGRAMS 

HOMEWARE New I Give vour CoCo real power at 

home. Printer preferred. Works with tape 

or disk. Five modules: 

CALENDAR Draw calendars. Various formats. 

SAVINGS/LOANS Powerful calculating tool. 

DIRECTORY Phone numbers, addresses, etc. 

INVENTORY For insurance, hobbies, business. 

HOME-WRITER Finally! Easv word processing. 

Single modules. . .$19.95 Whole set... $49. 95 
TFAC.HER PAK Weighted & regular grading, seating 

charts, alphabetizing, statistical analysis. 

4 programs. Works with tape or disk. . .$34.95 

TIME MASTER Rainbow review 12/85 $19.95 

COCO GARDENER Discover computerized garden 

planning. Printer preferred $19.95 

PERPETUL1FE Checkers & Life mixed $19.95 

GRAPHIC PHYSICS Rainbow review 9/85 $19.95 

COCO ECHO ML Rainbow review 10/85 $9.95 

All programs sold on tape. Send check or money 
order (no cash - Pa. residents add 6'/.) to: 



^ T ° th Box l63 tWare ^ 

RAINBOW RAINBOW 

„.,-<.,«, Rimersburg. Pa. 16248 "■"„■?■*■ 

All of these programs carry the Rainbow Seal. 



140, 4 
90 DATA 33, 38, 249, 142, 5, 223 
, 231, 128 

100 DATA 140, 6, 0, 38, 249, 142 
, 4, 63 
110 DATA 231, 128, 231, 128, 48, 

136, 30, 140 
120 DATA 5, 223, 38, 244, 241, 1 
25, 89, 39 

130 DATA 8, 241, 125, 90, 39, 11 
, 151, 135 

140 DATA 57, 203, 3, 247, 125, 9 
0, 126, 125 

150 DATA 5, 192, 3, 247, 125, 89 
, 126, 125 
160 DATA 5, 18, 18, 255, 0, 255, 

0, 255 
170 CLS 4 

180 REM*PUT YOUR TITLE PAGE HERE 
190 POKE 359,57:SCREEN0,1 
200 PRINT @ 10 6, "YOUR TITLE"; 
210 PRINT@168,"BY";CHR$(191) ; "WH 
0";CHR$(191) ; "DONE" ;CHR$( 191) ;"I 
T"; 

220 PRINTS 4 52, "PRESS <ENTER> TO 
CONTINUE" ; 
230 EXEC32000 
240 CLS 5 

250 REM* PUT YOU MENU HERE 
260 PRINT@70,STRING$(19,32) ; 
270 PRINT@70+32,"(1) MENU ITEM 
NE " ; 

280 PRINT@70+64,"(2) MENU ITEM T 
WO " ; 

290 PRINT§70+9 6," (3) MENU ITEM T 
HREE"; 

300 PRINT@70+128,STRING$(19,32) ; 
310 EXEC32000 
320 POKE359,12 6:SCREEN0,1 
330 REM*CHANGE GOTO TO YOUR LINE 

NUMBERS 
340 IF PEEK(135)=49 THEN GOTO 39 

350 IF PEEK (13 5) =50 THEN GOTO 41 

360 IF PEEK(135)=51 THEN GOTO 43 

P 

370 IF PEEK(135)=13 THEN GOTO 31 

380 REM* YOUR PROGRAM STARTS HERE 

390 CLS : PRINT "YOU HAVE SELECTED 

MENU ITEM (1) "; 

400 END 

410 CLS:PRINT"YOU HAVE SELECTED 

MENU ITEM (2)"; 

420 END 

430 CLS:PRINT"YOU HAVE SELECTED 

MENU ITEM (3 ) " ; 

440 END 
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Listing 


2: 
















7D00 






00100 




ORG 


$7D00 


CAN BE ANY WHERE IN RAM 




7D00 


C6 


96 


00110 




LDB 


#150 


LOAD BORDER CODE 




7D02 


F7 


7D59 


00120 




STB 


STORE 


STORE BORDER CODE IN RAM 




7DJ2T5 


AD 


9F A000 


00130 


START 


JSR 


[$A000] 


CHECK KEYBOARD 




7D09 


81 


0D 


00140 




CMPA 


#13 


IS ENTER KEY PRESSED 




7D0B 


27 


39 


00150 




BEQ 


END 


IF SO RETURN TO BASIC PROGRAM 




7D0D 


81 


31 


00160 




CMPA 


#49 


IS THE 1 KEY PRESSED 




7D0F 


27 


35 


00170 




BEQ 


END 


IF SO RETURN TO BASIC 




7D11 


81 


32 


00180 




CMPA 


#50 


IS 2 KEY PRESSED 




7D13 


27 


31 


00190 




BEQ 


END 


IF SO RETURN TO BASIC 




7D15 


81 


33 


00200 




CMPA 


#51 


IS 3 KEY PRESSED 




7D17 


27 


2D 


00210 




BEQ 


END 


IF SO RETURN TO BASIC 




7D19 


8E 


0400 


00220 




LDX 


#$400 


LOAD START OF SCREEN 




7D1C 


E7 


80 


00230 


DRAW1 


STB 


,x+ 


STORE CHARACTER ON SCREEN 




7D1E 


8C 


0421 


00240 




CMPX 


#$421 


COMPARE FIRST LINE PLUS 1 




7D21 


26 


F9 


00250 




BNE 


DRAW1 


IF NOT EQUAL DO MORE 




7D23 


8E 


05DF 


00260 




LDX 


#$5DF 


FIRST CHARACTER BOTTOM LINE 




7D26 


E7 


80 


00270 


DRAW2 


STB 


,x+ 


STORE CHARACTER 




7D28 


8C 


0600 


00280 




CMPX 


#$600 


END OF TEXT SCREEN 




7D2B 


26 


F9 


00290 




BNE 


DRAW2 


IF NOT END CONTINUE 




7D2D 


8E 


043F 


00300 




LDX 


#$43F 


LAST CHARACTER SECOND LINE 




7D30 


E7 


80 


00310 


DRAW3 


STB 


,X+ 


STORE CHARACTER 




7D32 


E7 


80 


00320 




STB 


,x+ 


ONE MORE 




7D34 


30 


88 IE 


00330 




LEAX 


30.X 


ADD 30 TO SCREEN POSITION 




7D37 


8C 


05DF 


00340 




CMPX 


#$5DF 


LAST POSITION LINE 15 




7D3A 


26 


F4 


00350 




BNE 


DRAW3 


DO UNTILL EQUAL 




7D3C 


Fl 


7D59 


00360 




CMPB 


STORE 


IS CHARACTER SAME AS ONE IN RAM 




7D3F 


27 


08 


00370 




BEQ 


CHR1 


IF EQUAL GET NEW CHARACTER 




7D41 


Fl 


7D5A 


00380 




CMPB 


STORE+1 


IS CHR SAME AS ONE IN RAM 




7D44 


27 


0B 


00390 




BEQ 


CHR2 


IF EQUAL GET NEW CHR 




7D46 


97 


87 


00400 


END 


STA 


135 


STORE KEY PRESSED IN RAM 




7D48 


39 




00410 




RTS 




RETURN TO BASIC PROGRAM 




7D49 


CB 


03 


00420 


CHR1 


ADDB 


#3 


CHANGE CHR BY +3 




7D4B 


F7 


7D5A 


00430 




STB 


STORE+1 


STORE NEW CHR IN RAM 




7D4E 


7E 


7D05 


00440 




JMP 


START 


START OVER 




7D51 


C0 


03 


00450 


CHR2 


SUBB 


#3 


SUBTRACT 3 FROM CHR 




7D53 


F7 


7D59 


00460 




STB 


STORE 


STORE NEW CHR IN RAM 




7D56 


7E 


7D05 


00470 




JMP 


START 


START OVER 




7D59 


12 




00480 


STORE 


NOP 




CHR STORAGE AREA 1 




7D5A 


12 


0000 


00490 
00500 




NOP 
END 




CHR STORAGE AREA 2 




00000 TOTAL ERRORS 












/£\ 



EXPAND YOUR COCO! 


ADD FEATURES FROM THE LARGER COMPUTERSI 


DISK OWNERS 


TAPE USERS 


Up to 4 operating ayatama, or 


Up to 32K or your favorlta 


2 OOS'S and your boat program! 


programa In a ROM PACK! 


In ona chip. Qoaa inaida 


Manu driven. Juat plug II In 


DISK CONTROLLER 


and EXEC 


EASY INSTALLATION - FREE DETAILS 


WRITE TO: 


INOVATIVE SYSTEMS 






110 Ball Road 


SEND 


5 11.00 UP 


Roma, NY 1 3440 


S.A.S.E. NOW) 









See You at 

RA INB O Wfest- Chicago 

May 23-25 
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A FIRST FOR TANDY — Tandy 
Corporation reported sales exceeding 
half a billion dollars for the month of 
December. In addition they reported 
the corporation's first billion dollar 
quarter. December's 22 percent sales 
gains were the result of great demand 
for high quality computers and other 
electronics products to put under the 
Christmas tree. In addition to other 
items sold, the Color Computer found 
its way into many homes this Christ- 
mas. 

* * * 

HD BREAKTHROUGH — Tom Ro- 

ginski has announced OWL-WARE's 
introduction of Winchester BASIC. 
This modification of Disk Extended 
basic allows the user to access a hard 
drive of virtually any size immediately 
upon power-up. File size is limited only 
by the size of the drive. Although it adds 
power to OS-9, knowledge of OS-9 is 
not a requirement for operating the 
system. All files written to the hard 
drive are easily accessible from BASIC or 
OS-9. All BASIC and most ML pro- 
grams will run on this drive using 
Winchester BASIC. The modification is 
designed for use with the L.R. Tech 
interface, but OWL- WARE will provide 
customized versions if required. The 
price for Winchester BASIC is $50 with 
the purchase of a drive system. Hard 
drive systems start at $495 for five meg. 
For more information or to order, 
contact OWL- WARE, P.O. Box 116- 
D, Mertztown, PA 19539. 

* * * 

PREPARE FOR THE DERBY — 

Software Exchange has announced its 
new three-program package for all 
horse racing fans. The Enhanced Rac- 
ing Handicapped Program Package 
contains software for thoroughbred, 
harness, and bet return analysis on disk 
or cassette. It is available for the CoCo 
for $49.95. Write to Software Ex- 
change, 2681 Peter boro Rd., P.O. Box 
5382, IV. Bloomfteld, MI 48033. 

* * * 



PHONE LINE BLUES? — R.K. Burt- 
chaell Co. is now carrying a new pro- 
duct designed to allow private commun- 
ications. The Hy-Tek Exclude-A-Phone 
offers modem isolation. If your compu- 
ter is online and someone picks up an 
extension telephone, their phone will be 
dead. They won't hear anything and 
neither will your computer. Call (800) 
342-5752 or write to R.K. Burtchaell 
Co., 516 S.E. Morrison, Suite 201, 
Portland, OR 97214. 

* * * 

MONSTERS? — Monster Cable has 
announced a new line of computer 
cables. The DataSafe™ Series consists 
of 10 quality cables developed to con- 
nect all popular computers to printers 
and modems. Suggested retail prices 
will range from $40 to $60. For cables 
for your Color Computer, write to 
Monster Cable, 101 Townsend St., San 
Francisco, CA 94107. 



BUSINESS — Programmed Press an- 
nounced its new 1.3 version of invest- 
ment and statistical software. This is 
available in the form of a 220-page book 
which contains 50 BASIC programs for 
several business applications. The price 
for The Computer-Assisted Investment 
Handbook, is $19.95. Contact Pro- 
grammed Press, 2301 Baylis Ave., El- 
mont, NY 11003. (516) 775-0933. 



QUIETER DAISYWHEEL — C. Itoh 
has introduced a new 136-column, 40 
cps daisywheel printer. The D 10-40 is 
claimed to have an acoustic noise level 
of less than 60dB. It features three 
character pitches, compatibility with all 
Diablo printwheels, 8-bit parallel and 
RS-232C serial interfaces, and an 8K 
data buffer standard. Suggested retail is 
$949 which includes the C. Itoh one- 
year warranty. Options include an auto 
sheet feeder and a tractor feed mecha- 
nism. Contact C. Itoh Digital Products, 
Inc., 19750 South Vermont Ave., Suite 
220, Torrance, CA 90502, (800) 423- 
0300. 

* * * 



KODAK DISKS — Eastman Kodak 
Company has a new line of single- and 
double-sided diskettes. The 300- 
oersted, 5-14-inch disks are available in 
double- and quad-density formats for 
most applications. They can be found in 
packs of two, five and 10. 



NEW CATALOG — The new Radio 
Shack computer catalog is now availa- 
ble in Radio Shack stores. Two new 
Color Computer items in this catalog 
are the DC Modem Program Pak and 
a hard disk interface. The modem runs 
at 300-Baud and is capable of originate 
and answer modes. Retail price for the 
modem is $89.95. The hard disk inter- 
face is designed for use with primary 
drives. It requires 64K, Multi-Pak 
Interface, floppy disk and OS-9 version 
2.0 or later. It is available for $129.95. 
Both the modem and interface can be 
found at Radio Shack stores nation- 
wide. 



STORAGE — The Media Mate 5 XL 
Plus™, a locking disk file capable of 
storing 100 5-'/» inch diskettes was 
recently introduced by Amaray Interna- 
tional Corporation. The unit holds 
disks at a 30-degree angle for easy 
reading and it is stackable. It is available 
through retailers nationwide for $29.95. 
Also available is the MediaPack 4. This 
product includes four color-coded disk 
cases capable of holding 10 disks each. 
The individual units may be locked 
together to form a large diskette library. 
The price for the MediaPack 4 is $ 1 6.95. 
For more information contact Mark 
Dill, Amaray International Corpora- 
lion, 14935 N.E. 95th Street, Redmond, 
WA 98052-2508, (206) 881-1000. 



BUFF WHO? — Computer Friends has 
announced the Mac Master universal 
buffer and printer controller. Memory 
options are 64K, 256K and one meg and 
the prices range from $299 to $750. The 
buffer can be used to store any informa- 
tion to be sent to peripherals while the 
controller feature can store up to 99 
strings, which can be recalled from the 
front panel keyboard. Write to Compu- 
ter Friends, 6415 SW Canyon Ct., 
Portland, OR 97221, or call (800) 547- 
3303. 

* * * 
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A CHIP OFF THE OLD... 

Joystick, Serial or Cassette plug .$4.99 

6821 Standard PIA $9.95 

6822 Industrial Grade PIA $14.95 

6847 VDG Chip $19.95 

6809E CPU Chip (NEW LOW PRICE) ...$19.95 
Basic ROM 1.2 Chip (30% FASTER) ..$19.95 
68769 (Fits Disk Basic Skt) Eprom. $19.95 
Disk ROM 1.1 (New DOS Command) ..$29.95 
New SAM Chip w/heatsink (74LS785). $29.95 
Ext Basic 1.1 ROM - NEW LOW PRICE. $29. 95 
Tandy 1000 128K RAM Upgrade Kit ..$39.95 
Eprom Eraser - 3 min erasure time. $49. 95 
Model 100 8K Upgrade - (SAVE $70). $49. 95 
CoCo F irst Aid Kit - includes 2 PIAs, 

6809E & SAM (Be Prepared ! ! ! ) $59.95 

64K CoCo H - w7NEW keyboard $149.95 

Eprom Prgmr (2ms speed/2K - 16K).$149.95 

COCO LIBRARY... 

The CoCo Chronicles /1980-1985 $7.95 

CoCo Memory Map $14.95 

Basic Programming Tricks Revealed. $14.95 
The FACTS - Inside "guts" of CoCo. $16. 95 

500 Pokes, Peeks 'N Execs $16.95 

Basic 09 Tour Guide $19.95 

Utility Routines - Top Pgm Secrets . $19. 95 
Rainbow Book / Tape of Simulations .$19.95 

Color Basic Unraveled .$19.95 

Extended Basic Unraveled $19.95 

Disk Basic (1.0/1.1) Unraveled ...$19.95 

New! CoCo II Service Manual * $24.95 

SECOND Book & Tape of Adventures .$29.95 
The Complete Rainbow Guide to OS9.$19.95 
W/Two Disk Package of demo pgms ..$49.95 
C olor /Ex tended / Disk Basic Unraveled - 
Complete 3 Book Set - Save $10! ..$49.95 

MORE GOOD STUFF... 

CoCo Light Pen -^24r»5:Save $5!. .$19. 95 
Comguti^ze Y" Box - More positive 

connections than a "Y" Cable $29.95 

Colorware Real Talker 1 (CoCo I) .$59.95 
Color-ware Real Talker 2 (CoCo II). $64. 95 
Super Voice - SC-02 Synthesizer ..$79.95 
PBJ WORD-PAK Hi-Res 80x24 disply $129.95 
* - Specify CoCo II Catalogue Number 
All orders plus $3.00 S/H (Foreign $5.00) 
COD add $2.00 extra 
NYS Residents add Sales Tax 



COCO CABLES AND... 

Printer / Modem 15' Extender Cable .$14.95 
Tired of unplugging devices from your 
RS232 port? Try a RS232 "Y" Cable . $19.95 
Disk Drive Cable (34pin - 34pin) .$19.95 

Modem Cable - 6ft (DB25-DB25) $19.95 

Null Modem Cable - 4 pin to DB25 .$24.95 
Disk Interface/Rom Pak Extender - Move 
your disks & ROM Paks (3 feeTTT. $24.95 
40 Pin D ual " Y" Cable - Hook up a Disk 
w7Voice, Word Pak, CoCo Max , etc ..$29.95 
Triple RS2 32 Switcher - Now select one 
of any three RS232 peripherals ...$39.95 
D ELUXE RS232 Sw itcher - Dual switcher 

with 3 female DB-25 jacks $59.95 

40 Pin Triple "Y" Cable - Hook up any 3- 
Voice7Word/RS232/Digitizer PAKs ..$39.95 
Finally ! 24" Multi-Pak Extender ..$44.95 

OTHER GOOD STUFF... 

C-10 tapes in any quantity 49 cents 

5 1/4 Diskettes , any quantity .99 cents 

OS-9 Quick Reference Guide $3.95 

6809E Quick Reference Guide $3.95 

32K, 64K or 128K RAM Button $4.99 

Blank Amdek 3" Disks $4.99 

Rompak w/Blank PC Brd-27xx series .$9.95 
CoCo Keybd Adapter - Conver •; 26-3016 & 
277-1019 keybds to D/E CoCo's! ..$14.95 
Video Clear - This cable will reduce TV 
interference created by CoCo! ....$19.95 
The Magic Box - Load Mod I /1 1 1 Basic 

program tapes into the CoCo $24.95 

DOS Switcher - Select from any two DOSs 
TTJTsk 1.0 1.1, JD0S) in J&M ctlr .$24.95 

256K RAM Chips (Set of 8) $39.95 

EARS -CoCo's first Voice Recognition unit 
w/95% accuracy & 64 Voice Prints ! $99.95 

Master Key II w/Ext Cable $109.95 

Amdek Twin 3" Drvs w/controller .$249.95 

SPECTRUM PROJECTS 

PO BOX 2 1272 

93-15 86TH DRIVE 

WOQDHAVEN NY 11421 

COD ORDER HOT LINE 

718-441-2BQ7 



SPECTRUM PROJECTS 

SOFT AND HARD WARES FOR 
COLORFUL COMPUTING 
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COMMUNICATION 



QQi=Pf?COM/E - A complete sma 
terminal package! Upload, 
Download, Hi-Res (51X21 
screen, 300/1200 Baud, Offline 
Printing. 32/64K Disk* - $39.95 
* - Now with CoCo Slg & TBBS 
XMODEM support! Download ML! 
COMPUSERVE 5hr Start Kit $39.95 
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MODEMS 
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MINI-MODEM - Direct connect. 
300 Baud, Orig/Answer- $39.95** 
J-CAT Modem - Lowest priced 
auto/answer modem - $119.95 
HAYES SM300 - "Programmable" 
auto-dial/auto answer-$169. 95*"* 
Hayes"CLONE"1200 Baud-$199. 95** 
** - Add $12.95 for Modem Cable 
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KEYBOARDS 




WORD PROCESSING 



TELEWR TTER^-64 - Three Hi-Res 
screens, true lowercase char s 
right justify, full screen 
editor. Tape S49.95 Disk $59.95 
TELEPATCH - A TW-64 enhancer ! ! ! 
True block move, Ov ers trike & 
TSPOOLmode, Type Ahead Buffer 
FASTER Disk I/O 64K Disk S19.95 
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PRINTERS 
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GEMINI §G r 10 - 120 cps w/true 
descenders, 2K buffer, tract- 
frict feed. Near Let;er Quality 
mode, 1 Yr. warranty - $239.95 
BriteFace -The first I NTELLIGENT 
Parallel Ptr Interface for CoCo 
Auto set Baud rates from 600 to 
9600/NO switches to turn $59.95 
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MONITORS 



HJL-57 - Save $7.00 !l - $72.95 
HJL NumberJack Keypad - $79.95 
-Specify Model /Revision Board- 
CoCo Ke^bd Software - Finally! 
An ENHANCED Function Key Pgm! 4 
most wanted features: 9600 Baud 
Poke, Text Screen Dump, Line 
Listing & Cold Start-DSK $14.95 
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Monitor Stand $24.95 
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MONOCHROME Monitors - CRISP 
80x24 Hi-Res screens! $99.95 
Universal Video Driver - Works 
w7all monitors & CoCos!- $29.95 
Monitor Stand - Swivels 360°, 
Tilts Up or Down 12.5°!! $24.95 
TAXAN Tunei — Receive TV channels 
on any composite monitor $99.95 
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SAVE $10 



OFF COLORCOM/E WITH A HAYES MODEM 
OFF TELEWRITER-64 WITH ANY PRINTER, 
KEYBOARD OR MONITOR 



SAVE $10 



COD ORDER HOT LINE - CALL 7 18-441-2807 



SPECTRUM PROJECTS 

SOFT AND HARD WARES FOR 
COLORFUL COMPUTING 



SPREADSHEET 
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Competition] |DYNACALC| 

Screen 32X16 51X24 

Precision 9 digits 16 digits 
Hi-Res Graphics NO YES 

Visicalc cmd format NO YES 
New low price! 64K Disk $69.95 
Side Wise -Print D YNACALC files 
up to 255 chars- sideways ! $24. 95 
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DISK DRIVES 



DRIVE System* - SS/DD, 6ms, 
40 Tracks, Half Height .$199.95 
DRIVE & 1 System* - $299.95 
Disk Drive 1, 2 or 3 - $119.95 
Power Supply & Case - $59.95 
Bare 1/2 Height Drive - $79.95 
Dbl Sided Drv System* $239.95 
* PLUS: control ler-manual-cable 



DISK SOFTWARE 



** 



1. Color FORTH $24.95 

2. EZ Base (Database) ...$24.95 

3. Graphicom $24.95 

4. Graphicom Part II $24.95 

5. Greeting Cd Designer .$24.95 

6. Blackjack Royale $24.95 

7. Spect'm Adv Generator $29.95 

8. HARDC0PY( Specify PTR) $29.95 




ATA BASE MANAGER 



PBQ-CQLOR FILE 2.0 - 60 Data 
Fids, 8 Report Fmts, 4 Screen 
Fmts, 1020 bytes/record, Sort 3 
Fields, Global Search, FAST ML 
Sort, Create Files Compatibl e 
w/DYNACALC! - Disk $49.95 
Pro Color Di_r and PCF Forms - 
Buy r em both" for only $29.95 
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GAME CONTROLLERS 



Wico C omman d Adapte r - Now you 
can hookup 2 Atari type joystks 
to your CoCo for only $19.95! 
Joystick/ Mouse 10' Ext Cable - 
Great for CoCoMax users! $19.95 
DELUXE Joystick - 360 Degree 
control with center return or 
analog positioning - $39.95 
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COCO II UPGRADES 
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Want to upgrade your new $88 
CoCo II? ( See below ! ! ) 
4464 DRAMs - two chip 64K 
uDerade for 26-3134A and 26- 

3134B CoCo II's $39.95 

Extended BASIC - 28 pin ROM for 

26-3134 A/B $34.95 

Buy 'em BOTH for only - $69.95 
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DISK SOFTWARE ** 

Buy any 2 - Save 10% 
Buy any 3 - Save 15% 
Buy any 4 - Save 20% 



SPECTRUM PROJECTS, Inc. 

PO BOX 21272 
93-15 86th DRIVE 
WOODHAVEN NY 11421 



FREE - Send for our 
CoCo catalog flier III 
Dealer inquiries invited ! 



All orders plus $3.00 S/H (Foreign $5.00) - COD add $2.00 extra - NYS Residents add Sales Tax 



nvasion of the 
Flying Saucer 
People 



By Allen B. Carlisle 




Kyou like fast action games that 
challenge your reflexes and of- 
fer different skill levels, you 
will like Saucer. The scenario goes 
something like this: You are on a des- 
olate planet, and while safe from attack 
from the dreaded Saucer people from 
within your base camp (lower right- 
hand corner of the graphics screen), you 
must venture out to get the supply 
boxes, which are present at the lower 
left-hand corner of the graphics screen. 
The moment you venture out, or your 
robot ventures out (for those who abhor 
violence), a saucer enters the scene and 
randomly flies around shooting its laser 
beam at you. If you are hit, another 
man, or robot, exits the base and heads 
for the needed supplies. Each player 
gets four men per round. 



Allen Carlisle teaches math at Airline 
High School in Bossier City, Louisiana. 
He has a bachelor 's degree and a mas- 
ter's in math from Texas Tech. He lives 
in Shreveport, Louisiana. 



You are not left without defense, 
however, as you can shoot back by 
skillful use of the right joystick. Of 
course, the firebutton activates your 
laser gun, but aiming it takes a few 
attempts to master. Each time you 
succeed in knocking out a saucer, 100 
points are scored. Aiming your gun 
involves watching a blinking cursor at 
the uppermost horizontal part of the 
screen or the far left vertical position of 
the graphics screen. Your ray fires at 
that cursor position as you press the 
button. Movement to the right of the 
joystick causes the cursor to appear at 
the top, while movement to the left 
moves the cursor to the left vertical part 
of the screen. Up on the joystick causes 
the cursor to move up the screen if it is 
at the left vertical position, and to the 
left if it is at the upper horizontal 
position. Of course, down performs the 
opposite movements. 

When I decided to write Saucer, I 
knew the main mathematical task 
would be to obtain the formula that 
calculates the coordinates of the point 
on a line (laser ray) that is on the 
segment perpendicular to some other 



point off the line (center of the saucer). 
After having looked in all my analytical 
geometry texts, I found nothing that 
would give me what I needed, so I took 
some time to derive the formulae I 
needed. Line 1090 of this program is 
what gives the coordinates of this point 
(LX,LY), where (A,B) and (C,D) are 
two points of the laser beam shot at the 
saucer and (X, Y) is the coordinate of the 
center of the saucer. The actual distance 
is calculated in Line 1 100. 

Variable QED is the test variable for 
this distance, which is larger for the 
lower skill level so that at skill level one, 
the beam does not necessarily have to 
touch the saucer in order to score a hit, 
but must be very close. 

I invite inquiries concerning any 
aspect of this game. I have yet to score 
the 1,000 points obtained by success- 
fully returning a supply box to base (but 
I got pretty close once). Write and let 
me know if you do or are able to do this 
at the higher skill levels. My address is 
3533 San Augustine, Shreveport, LA 
71105. 1 would like to hear from you. 
Good luck knocking those nasty Saucer 
people from the sky! □ 
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The listing: SAUCER 

10 REM SAUCER ***************** 

20 REM (C) ALLEN B. CARLISLE 198 
5**** 

30 REM ALL RIGHTS RESERVED****** 
* 

4^3 I **************************** 
50 ***************************** 
60 REM INITIALIZE GAME 
10 CLS : PCLEAR4 : POKE 6 5 4 9 5 , 
80 DIMA$ (4) :DIMA (4) : INPUT "NUMBER 
OF PLAYERS" ;ZZ 




90 FOR PL=1 TO ZZ:CLS:INPUT"ENTE 

R NAMES " ; A$ ( PL) : NEXT : CLS : PL=1 

100 INPUT"SKILL LEVEL(l-5) " ;L 

110 IF L<1 OR L>5 THEN 100 ELSE 

L=ABS(INT(L)) 

120 IF L=l THEN 130 ELSE 140 

130 DIS=0:QED=17:GOTO2 50 

140 IF L=2 THEN 150 ELSE 160 

150 DIS=1:QED=15:GOTO250 

160 IF L=3 THEN 170 ELSE 180 

170 DIS=3:QED=13:GOTO2 50 

180 IF L=4 THEN 190 ELSE 200 

190 DIS=3:QED=10:GOTO250 

200 DIS=3 : QED=8 : GOT02 50 

210 IF PL>ZZ THEN PL=1 

220 A(PL)=A(PL)+SCR 

230 IF MEN=0 THEN PL=PL+1 

240 IF MEN=0 THEN GOTO1170 ELSE 

RETURN 

250 REM DRAW SAUCER & GET IT 

260 PM0DE4,1:U=214:SCREEN1,1:PCL 

S0:MEN=8 

270 H1=20:H2=44:V1=7:V2=7:V3=7:V 

4=7 : FL=-1 : BOX=0 : M=9 2 

280 FOR 1=1 TO 4: LINE (HI, V3) - (H 

2,V4) ,PSET:LINE(H1,V1)-(H2,V2) ,P 

SET 



290 H1=H1+1:H2=H2-1:V1=V1-1:V2=V 

2-l:V3=V3+l:V4=V4+l:PSET(31,2) :P 

SET(32,2) :NEXT 

300 DIMS(12,26) :GET (19 , 1) - (45 , 13 

) ,S,G:LINE(19,1)-(45,13) , PRESET, 

BF 

310 REM DRAW &GET ROBOT 

320 DRAW"BM217,180R3D1L3R2D6L1U3 

L1;B;U1L2U1;B;D9R1U1;B;R1U2;B;R3 

D1;B;R1;B;D1D1L1" 

330 DIMR(11,8) :GET(214,180)-(222 

,191),R,G 

340 REM DRAW BASE 

350 LINE(240,164)-(255,191) , PSET 

,BF: LINE (228, 176) -(244, 191) ,PSET 

,BF 

3 60 FOR 1=168 TO 184 STEP 8 : LINE 

(248, I) -(251, 1+3) , PRESET, BF: NEXT 

370 LINE(232,184)-(235,187) , PRES 

ET,BF: LINE (240, 184) -(24 3, 187) , PR 

ESET,BF 

380 REM DRAW SUPPLY BOXES 

390 FOR 1=0 TO 88 STEP 8 

400 LINE(I, 180)-(I+3, 191) , PSET, B 

:NEXT:SCREEN1,1 

410 REM ENTER SAUCER 

420 FOR 1=0 TO 128 STEP 8 

430 W=20 

440 PUT(I,20)-(I+26,32) ,S,PSET 

450 LINE(I, 20)-(I+26, 32) , PRESET, 

BF 

460 ABR=RND(9) : IF ABR=2 THEN 480 

ELSENEXT 

470 GOTO 490 

480 GOTO 510 

490 I=128:PUT(I,W)-(I+26,W+12) ,S 

,PSET:GOTO510 

500 REM MOVE SAUCER 

510 Q1=RND(0):IF QK.5 THEN A=-l 

ELSE A=l 
520 Q2=RND(0):IF Q2<.5 THEN B=-l 

ELSE B=l:H=RND(6) :V=RND(6) 
530 H=H*A:V=V*B:L=RND(20) 
540 FOR E=l TO L 
550 IF I>226 THEN 630 
560 IF W>140 THEN 630 
570 IF I<0 THEN 630 
580 IF W<0 THEN 630 
590 PUT(I,W) -(1+26, W+12) ,S, PSET: 
X=I : Y=W 
600 GOSUB 640 

610 LINE(I,W) -(1+26, W+12) , PRESET 
,BF:I=I+H:W=W+V 
620 NEXT:GOTO630 

630 PUT(X,Y)-(X+26,Y+12) ,S,PSET: 
GOSUB780:FOR DLY=1 TO 2:SOUND216 
,l:SOUND22 6,l:GOSUB 820: NEXT: I=X 
: W=Y : GOSUB8 60 : GOT05 10 



March 1986 THE RAINBOW 



109 



I $■*<» COLORFUL UTILITIES «h»* 



COCO CHECKER* 



Something possibly wrong with your CoCo ??? CoCo CHECKER is the answer !! Will test your ROMs, 
RAMs, Disk Drives & Controller, Printer, Keyboard, Cassette, Joysticks, Sound, PIAs, VDG, Internal 
Clock Speed, Multi-Pak Interface and more!! 16K TAPE/DISK $19.95 (see Jan '85 Rainbow Review) 



MULTI-PAK CRAK 



Save ROMPAKs to your 64K Disk system using the RS Multi-Pak Interface. Eliminate constant 
plugging in of ROMPAKs now by keeping all your PA K software on disk . Includes POKEs for 
" PROBLE M" ROMPAKs. (Downland, Megabug, Micro Painter, Stellar Lifeline, etc..) 64K DISK $24.95 



FAST DUPE II 



Will format & backup a disk in only _1_ PASS (up to 23 grans) & make up to 4 copies in 2 minutes ! 
The must utility for every multiple Drive owner. 32K DISK $14.95 (see May'85 Rainbow Review) 



SPIT l\l IMAGE 



A super upgrade from Disk Omni Clone! Back everything up! This amazing program handles "non 
standard " disks with ease. We haven't found any disk yet that it can't handle. Don't ever be caught 
without a backup again! Lowest price too! Beats most " copy protection " programs! 32K DISK $29.95 



COCO SCREEN DUMP 



The best screen dump program for the Panasonic , Epson & Gemini printers ever! Have the option of 
standard or reverse images w/regular or double sized proportional pictures. 600-9600 Baud too! A 
must for Graphicom and Bjork Block users. 16K TAPE/DISK $19.95 (see Nov '84 Rainbow Review) 



DISK UTILITY 2.1* 



A m ulti - featured tool for USER FRIENDLY disk handling. Utilize a directory window to selectively 
sort, move, rename and kill file entries. Lightning fast Disk I/O for format , copy end backup. 
E xamine contents of files, the Granule Table, plus the size, load addresses and entry points of all 
programs. Single command execution of both Basic and ML programs. 32K/64K DISK $24.95 " Disk 
Uti lity has proven itself very quickly at my house" - Ed Ellers Oct '84 Rainbow Review pc. 220 



SPECTRUM FONT GENERATOR 



Now you can write files using any CoCo Word Processor (Telewnter-64, VIP Writer, etc.) end convert 
them to special Highly Detailed character sets ! Some of the character sets supported are Italics , 
Old English , Futuristic and Block . A character set editor is included to create custom sets or 
modify existing ones! Supports most dot - matrix printers! DISK" $29.95 (see Dec '85 Rainbow Review) 



SPECTRUM DOS 



Add 24 NEW Disk commands with 2 Hi-Res screens! Supports 40 track & Double -Sided drives, 6 ms 
stepping, auto disk search, error trapping & " EPRO M ABLE ". 64K DISK $*9»eS New LOW price!! $24.95 



SCHEMATIC DRAFTING PROCESSOR 



Save tim e end design pro looking diagrams using a 480X540 pixel worksheet w/6 viewing windows . 
Over 30 electronic symbols w/10 definable symbols . (Even Logic gates & Mu 1 1 i p i n chips!) Print hard 
copy and save to disk . 64K DISK $4©»9S: New LOW price!!! $29.95 (see Jan '84 Rainbow Review) 



BASIC* 



iasic+ provides (23) of the most used BASIC cmds w/ one keystroke plus scrolling & editing 
w/single key! Also included is a 32 character typahead BUFFERED keybd w /auto key & repeat plus 
a 32K Print Spooler!! And all that appears on the screen can be echoed to the p_tr_! 64K DISK $29.95 



COCO CHECKBOOK 



Use your CoCo to keep track of your checking and savings accounts! Printout individual personal 
checks! 32K/64K TAPE $29.95 DISK $39.95 (see April'85 pg. 210 & Oct'85 pg. 197 Rainbow Reviews) 



OW AVAILABLE BY EXPRESS ORDER AT 
YOUR LOCAL RADIO SHACK STORE - 

90-0S89 COCO CHECKER - #90-0290 DISK UTILITY 2.1 



BUY ANY 4 PROGRAMS 
GET THE FIFTH FREE !* 



DEMAND TO SEE 
THE DEMO DISK !!! 
CFC#OS19j 
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COCO TEXT UTIL 



Includes utilities that most CoCo word processors (TW-64, VIP Writer, etc.) leave out! Reset m argins 
to correct length for uploading , convert all UPPER CASE text to mixed upper/lower, display total 
BYTE count, EASY rename & kill functions plus read or print ANY disk file! DISK $19.95 



COCO VIDEO TITLER 



Start your VCR tapes with dazzling title frames followed by professional countdown to black fade- 
outs! Use a title page editor with several sizes of text & background colors ! 16K TAPE $19.95 



PENPAL 



it's here! CoCo's answer to 1-2-3 ! PENPAL combines Word Processing, Communications, Graphics, 
Data Base & Spread-sheet into a single integrated software package! 64K DISK INTRO PRICE $69.95 



E4K DISK UTILITY PACKAGE 



Take advantage of an expanded 64K machine. Make an additional 8K of_ RAM available by relocating 
the Ext Basic ROM from $8000 to SD800. Copy ROMPAKS to disk (even " protected " PAKS) and create 
a 32K SPOO L buffer for printing. DISK $21.95 (see July '83 Rainbow Review) 



TAPE/DISK UTILITY 



A powerful package that transfers tape to disk and disk to tape automatically. Does an automatic 
copy of an entire disk of programs to tape. Ideal for Rainbow On Tape to disk. Also copies tape to 
tape & prints tape S disk directories. TAPE/DISK $24.95 (see Sept '83 Rainbow Review) 



FAST TAPE 



Save and load cassette files at twice the speed! Now you can run tape and printer I/O operations 
in the high speed mode without a locked up system or I/O ERRORS! Works great with the popular 
Telewriter-64 word processor tape by Cognitec. "If you are tired of waiting for those Jon_g tapes to 
load, I strongly recommend that you buy this fine utility." TAPE $21.95 July '83 Rainbow 



COCO CALENDAR 



Get organized for '86 TODAY with the CoCo Calendar! Designed for recording the entire year's 
occassions and daily appointments so you can plan ahead. You can store HUNDREDS of entries and 
our GRAPHIC Calendar will show the DAYS that have all the MEMOS! 32/64K DISK $24.95 



THE OS-9 SOLUTION 



NOW, a program that creates a " USER FRIENDLY " environment within OS-9! The OS-9 SOLUTION 
replaces 19 of the old " USER HOSTILE " commands with single keystroke, menu driven commands. No 
more typing in complex long pathnames or remembering complicated syntaxes! Set all XMODE 
parameters at the touch of keys! Requires OS-9 ver.01.01.00 $39.95 (see Sept '85 Rainbow Review) 



COCO-UTIL 



Now you can have the power to easily transfer Radio Shack Color Computer disk files to your 
rtS-DOS machine - including the Tandy 1000 & _IBM PCM! You can also transfer MS-DOS files to your 
CoCo disk, even format CoCo disks! CoCo-Util will save you countless hours of retyping ! No need to 
move your computer or printer anymore! Requires 128K MS-DOS computer w/2 disk drives - $29.95 



SOFTWARE BONANZA PACKAGE 



Create an instant library of Spectrum Projects TOP Colorful Utility software. Select any 10 programs 
to customize your own SPECTACULAR SOFTWARE BONANZA! CoCo Checker, Multi-Pak Crak, CoCo 
Screen Dump, Disk Utility 2.1, Spectrum Font Generator, Tape/Disk Utility, Fast Dupe II, Schematic 
Drafting Processor, OS-9 Solution, 64K Disk Utility or Basic* ( a $250 plus value ) for only $119.95!! 
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640 REM MOVE ROBOT 

650 GOSUB860 

660 IF FL>0 THEN 700 

670 LINE(U, 180) -(U+8, 191) , PRESET 

,BF:U=U-1:PUT(U,180) -(U+8,191) ,R 

,PSET 

680 IF M=U THEN 690 ELSE RETURN 

690 FL=FL*-l:BOX=BOX+l:IF BOX=l 

THEN 750 ELSE U=U-8 

700 IF U<0 THEN U=0 

710 LINE (U, 180) -(U+13, 191) , PRESE 

T,BF:PUT(U,180)-(U+13,191) ,B,PSE 

T:U=U+1 

720 IF U=215 THEN 730 ELSE RETUR 

N 

730 LINE (U, 180) -(U+13, 191) , PRESE 

T,BF:FL=FL*-l:U=214:PUT(U,180)-( 

U+13 ,191) ,R,PSET 

740 M=M-8:SCR=1000:GOSUB210:IF M 

<4 THEN 1250 ELSE RETURN 

750 REM GET ROBOT & BOX 

760 DIMB(11,13) :GET(87,180)-(100 

,191) ,B,G:U=87:GOTO 700 

770 REM SHOOT LASER BEAM 

780 XX=X+13:L=U+4:R1=RND(5) :R2=R 

ND(5) :R3=RND(5) :R=R1+R2+R3 

790 IF L-9+R<0 THEN R=9 

800 LINE (XX,Y)-(L-8+R, 191) ,PSET: 

FOR DLY=1 TO 40: NEXT 

810 LINE (XX, Y)-(L-8+R, 191) , PRESE 

T : RETURN 

820 IF ABS(R-8)<=DIS THEN 830 EL 

SE RETURN 

830 LINE (U, 180) -(U+8, 191) , PRESET 

,BF:MEN=MEN-1 

840 SCR=0 

850 U=2 14 :FL=-l:GOSUB2 10: RETURN 

860 REM ROBOT SHOOTS 

870 K=PEEK(65280) : IF K=126 OR K= 

254 THEN 1020 

880 J0=JOYSTK(0) : Jl=JOYSTK( 1) 

890 IF Jl>54 THEN UN=UN+8 

900 IF Jl>45 AND Jl<=54 THEN UN= 

UN+5 

910 IF Jl>36 AND Jl<=45 THEN UN= 

UN+2 

920 IF Jl>27 AND Jl<=3 6 THEN UN= 

UN 

930 IF Jl>18 AND Jl<=27 THEN UN= 

UN-2 

940 IF Jl>9 AND Jl<=18 THEN UN=U 

N-5 

950 IF J1>=0 AND Jl<=9 THEN UN=U 

N-8 

960 IF UN<0 THEN UN=0 

970 IF J0>32 THEN 1000 

980 IF UN>160 THEN UN=160 

990 LINE(0,UN)-(4,UN+4) ,PSET,BF 



: LINE (0 , UN ) - ( 4 , UN+4 ) , PRESET , BF : R 

ETURN 

1000 IF UN>254 THEN UN=254 

1010 LINE (UN, 0)- (UN+4, 4) ,PSET,BF 

:LINE(UN,0)-(UN+4,4) , PRESET, BF:R 

ETURN 

1020 IF J0>32 THEN 1050 

1030 A=0:B=UN:C=U:D=180 

1040 LINE (0 , UN) - (U , 180 ) , PSET : FOR 

DLY=1T02 : SOUND2 16 , 1 : SOUND2 2 6,1: 
NEXT :GOSUB1070: LINE (0, UN) -(U, 180 
) , PRESET : RETURN 

1050 LINE (UN , ) - (U , 180 ) , PSET : A=U 
N:B=0:C=U:D=180 

1060 F0RDLY=1T02:S0UND216, l:SOUN 
D2 2 6 , 1 : NEXT : GOSUB1070 : LINE (UN , ) 
- (U , 180 ) , PRESET : RETURN 
1070 REM CHECK IF SAUCER HIT 
1080 X=X+13:Y=Y+6 

1090 LX=(X*(C-A) A 2+A*(D-B) A 2+(D- 
B) * (C-A) * (Y-B) )/ ( (D-B) A 2+ (C-A) A 2 
) :LY=(B*(C-A) A 2+Y*(B-D) A 2+(B-D)* 
(C-A)*(A-X) )/((D-B) A 2+(C-A) A 2) 
1100 IF SQR((LY-Y) A 2+(LX-X) A 2)<= 
QED THEN 1120 

1110 X=X-13 : Y=Y-6 : FORDLY=lTOX : AB 
R=RND(0) : NEXT: RETURN 
1120 REM SAUCER HIT 
1130 LINE(I,W)-(I+2 6,W+12) , PRESE 
T , BF : FORDLY=1TO20 : SOUND200 , 1 : RH= 
RND (26): RV=RND ( 12 ) : PSET ( I+RH , W+R 
V) :NEXT:X=X-13:Y=Y-6 
1140 LINE(I,W)-(I+2 6,W+12) , PRESE 
T,BF 

1150 IF J0>32 THEN LINE (UN,0) - (U 
, 180 ) , PRESETELSELINE (0 ,UN) - (U, 18 
0) , PRESET 

1160 SCR=100:GOSUB210:GOTO410 
1170 CLS:FORK=l TO ZZ : PRINT@ (64+ 
K*64) ,A$(K) ;"'S SCORE= ";A(K):NE 
XT 

1180 PRINT@384,"TO END GAME PRES 
S 'E MI :PRINT@3 52,"NEXT ROUND PRE 
SS "N"' 

1190 B$=INKEY$:IF B$="E"THEN1260 
ELSE IFB$="N"THEN1220ELSEIFFLAG= 
1THENRETURNELSE1190 
1200 IF FLAG=1THENRETURN 
1210 CLS 

1220 IF PL>ZZ THEN PL=1 
1230 PRINT@230,"R E A D Y ";A$(P 
L) ; : FORDLY=lTO 5000 : NEXT 
1240 LINE (X,Y) - (X+26,Y+12) , PRESE 
T , BF : SCREEN1 , 1 : MEN=8 : GOT04 10 
1250 CLS:PRINT@103,"G A M E O V 

E R !!! !": NEXT: FOR DLY=1 TO 150 
00 : NEXT : FLAG=1 : GOSUB1170 
1260 POKE113,0:EXEC40999 SZS 
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SPECTRUM 
STRIKES s xS 
BACK !lk*>>> 




- CoCo Legends Collection - Bob "Whiffle" Rosen 



256K/512K RAM UPGRADES 
FOR COCO II ARE HERE ! 



*»« THUMPER RAM *« SUPER COHTROUER 



STRIKE I - RAM ! 



Easy installation, 

software and 
tech information! 

(NOT available for CoCo ll's) 



OS-9 
DRIVER 
$24.95 




The first 256K memory Bd for the CoCo! 
Load four 32K pgms at once, emulate a 
40trk RAMDISK, 60K Print Spooler, FAST 
access, 30+ Hi-Res screens in memory!! 
$99.95 (see Sept '85 Rainbow Review) 

DOUBLE RAM - Upgrades a THUNDER RAM from 256K to 
512K giving TWO independent RAM Disks! $79.95 



COCO MAX E 



STRIKE 3 - A HIT! 

Feature packed hardware & software 
Graphics System! Includes: Pull-Down 
Menus, Icon processing, multiple Font 
styles, full graphic editing plus a special 
Input Module for 256x192 joystick input. 
64K DISK $79.95 

Requires MulthPak or Y-Cable ($29.95) 
CoCo Max I - II Disk Upgrade - $19.95 
CoCo Max (TAPE) $69.95 Digitizer $149.95 



STRIKE 2 -DOS I 



EPROM Programmer 
1 $59.95 1 



Uses 2764 ($6.95) 
or 27128 ($14.95) 

EPROMS ! (Requires Super Controller) 

The most AMAZING CoCo Disk Controller 
ever! Switch up to 4 DOS's (up to 16K) 
via a single software POKE! Choose 
between R/S 1.0/1.1, Spectrum DOS, 
ADOS, JDOS, Stearman DOS - $99.95 
DISPLAY 80 - 80 column display, RTC, 
& Ptr port. (Req. Super Controller) $99.95 

R/S DOS $19.95 and/or Spectrum DOS $29.95 
(27128 EPROM) with purchase of Super Controller 

SUPER RAM - A 256K/512K memory RAM 
DISK for CoCo ll's ! ! Requires Radio Shack 
Multi-Pak. Write for more information ! 

SPECTRUM PROJECTS, INC. 

PO BOX 21272 

93-15 86TH DRIVE 

WOODHAVENNY 11421 

Shipping $3.00 (Foreign $5,001 
COD $2 extra - NY Res add tax 
COD Order Line 718-441-2807 
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R/'c/c Hebert 
Wizard 

A portrait of a wizard busily 

enchanting garners second prize for 

Rick, who lives in Crowley, Louisiana. 

He used Graphicom I & II to give 

the gallery a glimpse of augury. 




Robbie Elam 
Mount Olympus 

The month of Mars (March) 
presents a gallery of mythology and 
magic as it opens with Robbie's 
depiction of the home of the gods in 
ancient Greece. Robbie used a 
"homemade graphics editor" and 
lives Panama City Beach, Florida. 
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Chris Steeves 
Dragon 

A snarling dragon ogles patrons of 
the gallery courtesy of Chris who 
lives in Fredericton, New Brunswick. 
Using Graphicom, Chris created a 
rapacious reptile for our third prize 
winner. 
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Charlie Fulp 
Minotaur's Kingdom 

Using CoCo Max, Charlie gifts the 

gallery with the sweeping grandeur of 

the Minotaur's Kingdom. Charlie 

lives in South Boston, Virginia. 




Send your entry on either tape or disk 

to: 

CoCo Gallery 

THE PA'.NBOW 

P.O. Box 385 
Prospect, KY 40059 
Attn: Monica Dorth 



o 



Andrew Bartels 
Tower 

Andrew submitted this majestic 
tower standing unguarded in 
unknown realms. Andrew lives in 
Sulphur, Oklahoma, and used a 
graphics program he wrote. 




o 



Sam Gladstone 
Excalibur 

No self-respecting gallery of myths 
could close without a depiction of 
King Arthur's gift from the Lady of the 
Lake. Sam used Extended basic to 
create this legendary sword. 



SHOWCASE YOUR BEST! 

You are invited to nominate original work for 
inclusion in upcoming showings of "CoCo Gallery." 
Share your creations with the CoCo Community! 

Be sure to send a cover letter with your name, 
address and phone number, detailing how you created 
your picture (what programs you used, etc.) and how 
to display it. Also, please include a few facts about 
yourself. 

Don't send us anything owned by someone else; this 
means no game screens, digitized images from TV 
programs or material that's already been submitted 
elsewhere. 

We will award a first prize of $25, a second prize of 
$15 and a third prize of $10. Honorable mentions will 
also be given. 

Monica Dorth, Curator 
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64K of Garbage 



By Ed Ellers 
Rainbow Technical Writer 



• / am having trouble upgrading my CoCo 
2 to 64K. The problem is in getting the 
computer to recognize the additional mem- 
ory. Before making the connection at Wl, 
the computer works fine as a 16 K system. 
After making this connection, a line of 
garbage characters is displayed on the 
screen. 

Paul Masline 
Wilton, CT 

There is probably a defect in one or more 
of your new chips that affects some memory 
locations above the 16K boundary. With Wl 
open, your CoCo doesn't try to look for any 
more than 16K. 



Programming in Stages 

• Is it possible to type in part of a program, 
save it on cassette and then finish the job 
later? 

Neil Edge 
Williston, FL 

Sure. There's nothing wrong with this 
procedure. In fact, it's a good idea to stop 
once in a while. 



Ed Ellers, a RAINBOW and PCM staff 
member, is a self-confessed electronics 
fanatic whose other interests include 
science fiction. 



CoCoScope 

• / would like to know how to transform my 
CoCo into a digital oscilloscope. 

A Quebec Reader 

Actually this isn't too far-fetched. Several 
scopes made by Tektronix, Hewlett-Packard 
and others actually digitize the incoming 
signal and display the wave form on the 
CRT as a bit-image graphics display. HP 
also has a system that hooks up to an IBM 
PC to do this, as does at least one other firm. 
To do this on the CoCo, you need an analog- 
to-digital converter circuit to accept the 
signal you want to look at; then it's a matter 
of writing a program to read the A-to-D 
converter output and display it. 



Disk Drive Transplant 

• / currently have two Tandon single-sided 
drives and a power supply that were re- 
moved from an IBM PC. Can these drives 
be used with the Color Computer? If so, 
what disk drive controller is best? 

Leon Donbrowski 
Ripon, Wl 

The drives you mention will work fine 
with the CoCo using any of the standard 
disk controllers on the market. You might 
want to look at the IBM PC Hardware 
Reference Manual to find out how to set up 
the jumpers on these drives. 



Single vs. Double 

• / don't know much about disk drives. I 
would like to know if a double-sided drive 
can be used with both single- and double- 
sided diskettes. 

Bret Boyer 
Marion, NC 



You can use single-sided diskettes in place 
of double-sided ones, but since the "other" 
side of the disks has not been tested it may 
have some flaws. 



Fast 64K 



• In the all- RAM mode (64 K), can you still 

use the speed-up POKE (POKE 65495, Z)? 

Also, how do you know whether you have 

the old or new Korean CoCo 2? 

Gregory Hill 
Chicago, IL 



Yes, you can speed up your computer's 
operation in the all-RAM mode — //your 
CoCo can accept the speed-up POKE at all. 

Actually, there are three different versions 
of the CoCo 2 that have been madtw. Korea. 
The "old" one had a model number such as 
26-3134 without a letter on the end; this has 
eight RAM chips. The"new"version had the 
letter 'A' on the end of the model number; 
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it uses two four-bit RAM chips and you 
would need 64K-by-four RAMs, such as 
4464 or uPD41254, to upgrade it to 64K. 
The current model, the 'B' version, is called 
Tandy instead of Radio Shack; this one uses 
two four-bit RAM chips and has a new video 
generator chip that provides both upper- 
and lowercase displays on the text screen. 



CAT Connections 



• / am trying to interface a Novation CA T 
modem to my CoCo. My problem is there 
are too many wires on the modem side. 
Would I also connect Pin 5 (clear to send) 
and Pin 6 (data set ready) to the CoCo's 
carrier detect input, or would I just leave 
these unhooked as unneeded items? 

Richard S. Nordeil 
Reeds. MO 

Since the CoCo's Serial I/O jack has only 
three active lines (transmit, receive and 
carrier detect), terminal programs for the 
CoCo are written to use only these three and 
there's no problem with leaving the others 
disconnected. In fact, although it's good 
practice to go ahead and connect the carrier 
detect line (Pin 8 on the modem), many 
terminal programs don't use it either. 



Key Bounce 



• I'm having a problem with the '5' key on 
my CoCo. I have a nice keyboard, but this 
key repeats two or three times when pressed. 
As you can tell, this creates an aggravating 
problem when entering programs. Would 
you please explain the problem? 

Mike Wells 
Chesterton, IN 

I've noticed some minor "key bounce" 
problems with the newer CoCo keyboards 
myself. Almost all key switches tend to 
bounce a bit, and because of this, a delay is 
used to make sure the extra pulses are 
ignored. Apparently the CoCo's key bounce 
delay, which was set for the original "chiclet" 
keyboard, may be just a bit short for the 
newer keyboards. 



More on Touch-Up Paint 

• Regarding touch-up paint for the ol' gray 
CoCo: We don't have a Mercedes dealer 
where I live, but I found a touch-up paint 
that seems to match quite well. It is Dupli- 
Color's DS-GM-224, Silver (for 1975-76 
Chevrolets, etc.). 

Jerold Krempel 
Chenango Bridge, NY 

Thanks for the information, Jerold. 



Delphi Downloading 

• In November of 1985 I signed up with 
Delphi and joined the CoCo SIG. I tried to 
download the machine language files of 
Mikeyterm 4.0, but I don t know how to save 
it to disk using the Autoterm program. 

Joseph Zak 
Parma, OH 

The machine language files on Delphi 
should be downloaded using an XMODEM 
terminal program such as Mikeyterm, Color 
Connection III or Colorcom/ E Version 3. In 
the case of Mikeyterm, just skip the first 



With a 300-ohm 
antenna input you're 
most likely picking 
up garbage through 
the short wire from 
the antenna screws 
to the VHF tuner 
inside the set . . . 
your best bet is to 
use a good outdoor 
TV antenna with a 
coaxial cable lead- 
in. 



machine language file and download the 
other files. Run the four basic loader 
programs (MTERMI, MTERM2, 
MTERM3 and MTERM4) in order, and 
you'll be able to save the Mikeyterm pro- 
gram to tape or disk. 



Making Book 

• / would like to know how to get the Delphi 
Handbook and Command Card. The adver- 
tisement says I can order it online, but how 
do I go about it? 

Brandon Rhodes 
Andover, MA 

If you haven't already signed up for 
Delphi, when you do so you'll be asked 
whether you want to buy the Handbook, 
Command Card and three hours of connect 
time atot a special price. If you're already 
using Delphi, just send a mail message to 
SERVICE to order the Handbook and 
Command Card. Either way, the cost ap- 



pears on your Delphi bill. You may also 
phone in an order to Delphi's toll-free line: 
(800) 544-4005. 

Also, you'll find a special edition of the 
Delphi Command Card in the February 
1986 rainbow on pages 89 and 90. 



RFI Revisited 

From Delphi Forum 

• I have a problem with RFI from my 
CoCo 2 (not Korean), fifter running 
coax from the CoCo directly to my TV's 
VHF antenna terminals (replaced box 
with matcher) and grounding the 
matcher to TV chassis, I have elim- 
inated 50 percent of my interfer- 
ence. HouievBr, I still have vertical 
interference lines, distinct and 
about four 1 ines per inch. When using 
the CoCo, the TV in the next room also 
shows this interference pattern. My 
TV is a brand new 13- incher , which has 
only a 300-ohm twin- lead connection. 
Any suggestions? 

Would a monitor eliminate my RFI 
problem (as a last r-Bsort)? If so, 
what is the difference between an 
"RGB" and a "composite color" moni- 
tor' I believe a TV is about 320 
lines. If so, does CoCo have the 
ability to use a monitor with higher 
resolution? Say 500 or 800 lines? 

Dennis Lytle 

(Delphi username: DENNISGEORGEj 

Saginaw, MI 

Actually, you've done about all you can 
do with that TV set. On my own TV (a 19- 
inch RCA ColorTrak), which has a 75-ohm 
coaxial antenna input, the path from the 
CoCo to the TV is fully shielded and I get 
a very nice picture. With a 300-ohm antenna 
input you're most likely picking up garbage 
through the short wire from the antenna 
screws to the VHF tuner inside the set. 

To clear up the interference on the other 
set, your best bet is to use a good outdoor 
TV antenna with a coaxial cable lead-in. 

The Federal Communications Commis- 
sion has a pamphlet, called "How to Identify 
and Resolve Radio-TV Interference Prob- 
lems," that might be helpful to you. Write 
to: U.S. Government Printing Office, Wash- 
ington, DC 20402, and ask for Stock 
Number 004-000-00345-4. 



Your technical questions are welcomed. 
Please address them to: Earth to Ed, THE 
rainbow, P.O. Box 385, Prospect, KY 
40059. We reserve the right to publish only 
questions of general interest and to edit for 
space and clarity. 

Your technical questions may also be sent 
to us through the MAIL section of our new 
Delphi CoCo SIG. From the CoCo SIG> 
prompt, pick DELPHI MAIL, then type 
SEND and address to: EDELLERS. 
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TH€ 

SAILOR 

MAN 

TAPE $29.95 
DISK $34.95 

i 



GMVICS 



. 




Requires 64K Machine Language 
Tho lirsi scroon objoctivo Is lo catch onougli ol Elsio's ktssos (ihoso Rod Hoart 
Shapea Things) lo Mi in the squares on the Saitortnan's house. II you can lime 
your punch (ust so, you can send tho punching bag ovor (o knock tho buckol down 
and. with a little bit ol luck, right on Blgtatbadguy'B head. This will givo you a 
little (but not much) time to catch all thoso RHSTs 

You must avoid contact with Blglaibidguy who is actively pursuing you You 
must also bo carolul of Olduglyaeawoman who will appear at higher dllllcully 
levels to chuck emptios at you. Either avoid the Hy- 
ing boitlos or punch thorn (with tho firo button) lo 
koep (rom being knocked into the water 
The second scroon obiodivo is lo collect onough 
notes to play Elsie a little love song. You may jump 
olt and onto the other end ol Fatguyoatlngham- 
burger's lootolotlor to fly up a dock and oven two 
decks it you manage lo catch hold ol Smnrtaleck- 
kid's grab handles. Time it right and away you go. 
The Third scroon objoctivo is to colloct onough loi- 
ters (thrown by Elsie's cries for H-E-L-P) to complete 
a laddor all tho way lo tho crow's nost whoro Elsie 
is calling you. Bowaro ol tho Crow, howovor. who 
thinks you are alter her eggs! 
On all screens, oating a can ol coilard groons 
(labeled "S" lor Coilard and grasped by punching 
tho can just right) will give you amazing speod, 
strength and ability and allow you to send Blglal- 
badguy into tho drink with a single punch 




***** €DUCHTIONfiL 



FflCTPRCK 



DRAGON 

sinvcR 








Save the villagers of Pendor! They 
live in fear of Icarus, the blood 
thirsty dragon. The dragon lives in 
a cave, way up in Ihe mountains. 
The cave is a treasure chest, full 
of gems and cashbags. The trail to 
the cave is as menacing as Icarus 
himself. Outstanding graphics 
throughoul. 160 screens of exciting 
action packed arcade excitement. 



FACTPACK is a sel ol 3 programs designed lor home 
or school use. The programs provide drill and 
practice with basic addition, subtraction, multi- 
plication and division lads and are appropriate in grades 1-6 Each program requires a 32K 
Extended BASIC Color Computer. Disk drive and printer are optional. 
Requires 32 K Ext. Basic Tape '24.95 Disk '29.95 

TCflCHCRS DOTflBflSC II e^C" 

Teachers' Dalabase (TDB) is a program designed to allow a teacher to keep a computerized 
file ol information about his/her students. 

The program requires a 64K Color Computer and at least one disk drive. This completely 
revised program includes all of the capabilities ol the original TDB plus many new leatures. 

• Information on as many as 100 students, or more, may be in the computer at one time. 

• Each student may have as many as 20, or more, individual items ol data in his/her record. 

• The program has many easy to follow menus. 

• Records may be easily changed, deleted, or combined. i^f J 

• Information about students may be numerical or text. 

• Records may be quickly alphabetized or reordered based on their contents. 

• Records may be sored by various criteria. 

■ A full statistical analysis of scores may be done and sent to the printer. 

• Student test scores may be weighted, averaged, changed lo a percentage or changed 
to a letter grade. 

• Individual student progress reports and class gradebook sheets may be printed. 

• Three methods ol data entry spped the task of typing in student grades and test results. 

• The program may be easily customized to work with any printer. 

• Student seating charts may be created and printed. 

• Graphs ol student test results may be created using the computer's high resolution graphic 
screen. 

• Grade distribution can be displayed numerically or as a histogram. 

64K TDBII S59.95 • 32K TDB Version - DISK S42.95 TAPE S39.95 



32K 



Disk $29.95 VOCflBUlMW MflNnG€M€NT 



THE KING 
Tape S26.95 

SR-71 
Tape 28.95 

DRACONIAN 
Tape S27.95 

MS. MAZE 
Tape $24.95 



32K 

Disk $29.95 

32 K 

Disk S31.95 

32K 

Disk S30.95 

32K 

Disk $27.95 



FROG 

Tape S27.95 

FANGMAN 
Tape $24.95 



16K 

Disk S30.95 

16K 

Disk $27.95 



KATER PILLAR II 16K 
Tape $24.95 Disk S27.95 



Requires 16K Ext. Basic or 32K for printer output. 

The Vocabulary Management System (VMS) is a series of programs designed to aid a parent 
or teacher in helping children lo learn and practice using vocabulary and spelling words. The 
11 programs that comprise the VMS include a full feature data entry/edit program, three printer 
output programs and 5 vocabulary/spelling game programs. The system's many outstanding 
leatures include: 

• As many as 300 vocabulary words and definitions may be in the computer's memory at 
one time. 

• Words and definitions may be saved on disk or tape. 

• Remarks and/or comments can be saved with word files. 



A disk loading menu allows students lo load disk files without typing tile names. 
. Word lists may be quickly alphabetized. 

WAREHOUSE MUTANTS 16K. the three printer segments allow you to create and print individualized tests, puzzles, 

word-searches and worksheets. 



Tape S24.95 sDisk S27 - 95 



j[NEWfr 



UTILITIES 



NOW! You can own the tools we've used to create "Donkey King", 
"Sailor Man", and others. 

We are proud to announce our new utilities for the 64K Disk Color 

Computer, featuring 

• Full use of 64K RAM • 100% Machine Language 

• Parameters easily changeable in basic loader • No ROM calls 

• "Cold start" exit to basic • Easy-to-read, informative documentation 

• Keyklik • Selectable drive stepping rate 

• Support 1-4 drives • Easy to use, with menu selected functions 

To make life with your disks easier, may we suggest. . . 

MAS — the finest assembler ever written for the 

Color Computer (includes EDT) S74.95 

Disk 
EDT — effortless full (51 x24) screen editing w/2 way cursor. Disk commands 
allow easy save/backup/append. Text files to 48K+. Copy, save, move, delete 
or print Blocks. Much more $39.95 

Disk 

The Deputy Inspector — Alphabetize, re-sort, and backup directory; fast 
3-swap backups, copy tiles or programs to same or other disks, can auto- 
reallocate granules during backup for faster loading, and more. . $21.95 

Disk 
The Sector Inspector — Alphabetize, backup, and printout directory; repair 
crashes, LLIST basic programs, name disks, read in and edit 23+ grans, 3-swap 
backups, and more. Has 16-page manual and gran 
table print program $29.95 

Disk 



• The printer segments allow lull use of your printer's special features. 

• The 5 game programs are based on sound educational principles and provide practice 
in identifying words and matching them with their definitions In a fast-paced set ol activities. 

TAPE '39.95 DISK '42.95 

FRACTIONS - n Three Program Package 

MIXED & IMPROPER 

1. Review converting mixed numerals and improper fractions. 

2. Practice convening mixed numerals to improper fractions. 

3. Practice converting improper fractions to mixed numerals. 

4. Practice of both types. (Mixed lo improper & improper to mixed) 

5. Review convening mixed numerals lo mixed numerals. (Used in regrouping in substraction). 

6. Practice converting mixed numerals to mixed numerals. 

EQUIVALENCE 

1. Definitions of terms and review of finding equivalent fractions. 
2 Practice finding equivalent fractions. 

3. Practice finding sets of equivalent fractions. 

4. Review of dinding il one fraction is equal to, not equal to, less than or greater than another. 

LOWEST TERMS 

1. Review of placing fractions into lowest terms by dinding the greatest comon factor (GCF) 
of the numerator and denominator. 

2. Practice finding the GCF ol pairs of numbers. 

3. Practice placing fractions into lowest terms by finding the GCF of the numerator and 
denominator. 

32K EXT BASIC TAPE 530.95 



DISK '35.95 



MATH DU€L 



MATH DUEL is a challenging mathematics game that pits you against the computet in a game 
ol wits. You must use all of your knowledge of factors, multiples and prime numbers to develop 
a strategy that allows you tog ather more numbers and thus more points than the computer. 

The game is deceptively simple, you select the size of the playing field that is composed ol 
from 8 lo 100 numbers. You must Ihen choose numbers that will give you the maximum number 
of points and the computer Ihe least number of points. There are only 6 rules. 
32K EXT. BASIC TAPE'24.95 DISK '29.95 



SIMULATIONS 




P51 

Mustang 



Attack Flight Simulator 



Experience the ultimate video experience. 

For the first time ever, two computers can be 

linked together with action and re-action at 

at either location, or play alone. The P-51 Mustang 

was the attack workhorse during WWII. To experience 

the flight of this beautiful plane in actual combat situation 



a 32K Machine Language 



<#*■ -#° will give many hours of excitement. You can test your skill 

e v~ \-C % against the computer to defend your position or try your hand 

•f 1 ^' competing against your opponent at any remote location. 

Two CoCo's can be linked by cable for TRUE two-player adventure. 

With the use of a modem you can test your skill across town or across 

country!! (Each individual needs a copy of the program.) This program is 

another first from Tom Mix Software. Order your excitement today. Direct cable 

available separately for using two computers at the same location. 

Disk $34.95 Cable $10.95 



Tape $29.95 




"World's ol Flight is the besl out- 
the-window simulation available 
for the CoCo". Dr. Scott L. 
Norman, Hot CoCo, Dec. 1984. 



JvirflP 




Worlds ol Flight (WOF) is a machine language, real-lime llighl simulalion (ol a sophisicaied ullra-lighl aircralt). The program 
is available on DISK bul was specifically designed lo bring unprecedented detail and power lo CASSETTE systems. WOF 
generates panoramic 3-D views ol ground leatures as the pilot flies within one ol nine different "worlds'. Insirumenl 
llighl capability has been provided along wilh some aerobatic performance. The simulation models over 35 diflerent 
aircraft and llighl performance parameters including winds and cloud ceilings. Sound effects have been faithfully 
reproduced to provide an even greater sense of realism. A 25 page light manual explains the insirumenl panel, the basis 
of flight control, instrument navigation and even walks the pilo! through a take off / landing sequence about the airport 
Complele with charts bound in an attractive binder, the entire WOF package challenges you to find a more advanced flight simula- 
tion lor any computer You simply can't! II you are a serious simulation buff this one is for you! 



JOYSTICKS REQUIRED 

32K MACHINE LANGUAGE 

TAPE S29.95 

DISK $34.95 




'APPROACH 

CONTROL 

SIMULATION 

From Betasoft Systems 




"Caught in a blinding snowstorm, two jet airliners are on a collision 
course The pilots are completely unaware of the imminent danger. Hun- 
dreds of lives are at stake. A high-speed disaster is inevitable unless 
you act fast . " 

This and many other exciting scenarios await you as "Air Traffic Con- 
troller" with the APPROACH CONTROL SIMULATION. The thrills, 
challenges and frustrations you'll experience with this authentic, real- 
time simulation will lead to countless hours of discovery and adventure. 

• • A Complete Simulation Package • • 

• Software on Disk or Tape • Comprehensive Manual 

• Quick Reference Guide • No Joysticks Required 

32K MACHINE LANGUAGE TAPE S29.95 DISK S34.95 



TOM MIX SOFTWARE 

4285 BRADFORD N.E. 
GRAND RAPIDS, Ml 49506 



ADD $3.00 POSTAGE & HANDLING'TOP ROYALTIES PAID 

• MICHIGAN RESIDENTS ADD 4% SALES TAX* 

WE HAVE MORE SOFTWARE AVAILABLE THAN LI STED. 

WRITE FOR OUR FREE CATALOGUE. 

TO ORDER CALL 616/957-0444 




How To Read Rainbow 



Please note that all the basic program 
listings in the rainbow are formatted for 
a 32-character screen — so they show 
up just as they do on your CoCo screen. 
One easy way to check on the accuracy 
of your typing is to compare what char- 
acter "goes under" what. If the charac- 
ters match — and your line endings 
come out the same — you have a pretty 
good way of knowing that your typing is 
accurate. 

We also have "key boxes" to show you 
the minimum system a program needs. 
But, do read the text before you start 
typing. 

Finally, the little cassette symbol on 
the table of contents and at the begin- 
ning of articles indicates that the pro- 
gram is available through our rainbow 
on tape service. An order form for this 
service is on the insert card bound in the 
magazine. 



What's A CoCo 



CoCo is an affectionate name that was 
first given to the Tandy Color Computer 
by its many fans, users and owners. 

However, when we use the term 
CoCo, we refer to both the Tandy Color 
Computer and the TDP System-100 
Computer. It is easier than using both of 
the "given" names throughout the rain- 
bow. 

In most cases, when a specific com- 
puter is mentioned, the application is for 
that specific computer. However, since 
the TDP System-100 and Tandy Color 
are, for all purposes, the same computer 
in a different case, these terms are 
almost always interchangeable. 



The Rainbow Check Plus 




The small box accompanying a pro- 
gram listing in the rainbow is a "check 
sum" system, which is designed to help 
you type in programs accurately. 

Rainbow Check PLUS counts the 
number and values of characters you 
type in. You can then compare the 
number you get to those printed in the 
rainbow. On longer programs, some 
benchmark lines are given. When you 
reach the end of one of those lines with 
your typing, simply check to see if the 
numbers match. 



To use Rainbow Check PLUS, type in 
the program and csfive it for later use, 
then type in the command RUN and press 
enter. Once the program has run, type 
new and press enter to remove it from 
the area where the program you're typ- 
ing in will go. 

Now, while keying in a listing from the 
rainbow, whenever you press the down- 
arrow key, your CoCo gives the check 
sum based on the length and content of 
the program in memory. This is to check 
against the numbers printed in the 
rainbow. If your number is different, 
check the listing carefully to be sure you 
typed in the correct basic program code. 
For more details on this helpful utility, 
refer to H. Allen Curtis' article on Page 
21 of the February 1984 rainbow. 

Since Rainbow Check PLUS counts 
spaces and punctuation, be sure to type 
in the listing exactly the way it's given in 
the magazine. 

10 CLS:X=256*PEEI<(35)+178 

20 CLEfiR 25.X-1 

30 X=25G«PEEI< (35)+178 

40 FDR Z=X TO X+77 

S0 READ Y:W=U+Y:PRINT Z,Y;W 

G0 POKE Z,Y:NEXT 

70 IFW=7985THEN80ELSEPRINT 

"DATA ERRDR":STDP 
80 EXECX:END 

90 DATA 182, 1, 10G, 1G7, 140, G0, 134 
100 DRTfi 12G, 183, 1, 106, 190, 1, 107 
110 DflTfi 175, 140, 50, 48, 140, 4, 191 
120 DflTfi 1, 107, 57, 129, 10, 3B, 38 
130 DATA 52, 22, 79, 158, 25, 230, 129 
140 DATA 39, 12, 171, 128, 171, 12B 
150 DATA 230, 132, 38, 250, 48, 1, 32 
1G0 DATA 240, 183, 2, 222, 48, 140. 14 
170 DfiTA 159, 1GG, 1GG, 132. 28, 254 
180 OfiTA 189, 173, 198, 53, 22, 12G, 
190 DATA 0, 135, 255, 134, 40, 55 
200 DATfi 51, 52, 41, 



Using Machine Language 



Machine language programs are one 
of the features of the rainbow. There are 
a number of ways to "get" these pro- 
grams into memory so you can operate 
them. 

The easiest way is by using an editor/ 
assembler, a program you can purchase 
from a number of sources. 

An editor/assembler allows you to 
enter mnemonics into the CoCo and 
then have the editor/assembler assem- 
ble them into specific instructions that 
are understood by the 6809 chip, which 
controls your computer. 



When using an editor/assembler, all 
you have to do, essentially, is copy the 
relevant instructions from the rainbow's 
listing into CoCo. 

Another method of getting an assem- 
bly language listing into CoCo is called 
"hand assembly." As the name implies, 
you do the assembly by hand. This can 
sometimes cause problems when you 
have to set up an ORIGIN statement or 
an EQUATE. In short, you have to know 
something about assembly to hand- 
assemble some programs. 

Use the following program if you wish 
to hand-assemble machine language 
listings: 

10 CLEAR200,8.H3F00:I=8.H3F80 

20 PRINT " ADDRESS: ";HEX$(I); 

30 INPUT "BYTE";8S 

40 POKE I,VfiL("&H"+BS) 

50 I=I+1:GDTD 20 

This program assumes you havea 16K 
CoCo. If you have 32K, change the 
&H3F00 in Line 10 to &H7F00 and change 
the value of I to S.H7FB0. 



The Rainbow Seal 



RAINBOW 

CERTIFICATION 
SEAL 

The Rainbow Certification Seal is our 
way of helping you, the consumer. The 
purpose of the Seal is to certify to you 
that any product that carries the Seal 
has been physically seen by us, that it 
does, indeed, exist and that we have a 
sample copy here at the rainbow. 

Manufacturers of products — hard- 
ware, software and firmware — are 
encouraged by us to submit their pro- 
ducts to the rainbow for certification. 
We ascertain that their products are, in 
actuality, what they purport to be and, 
upon such determination, award a Seal. 

The Seal, however, is not a "guarantee 
of satisfaction." The certification pro- 
cess is different from the review process. 
You are encouraged to read our reviews 
to determine whether the product is 
right for your needs. 

There is absolutely no relationship 
between advertising in the rainbow and 
the certification process. Certification is 
open and available to any product per- 
taining to CoCo. A Seal will be awarded 
to any commercial product, regardless 
of whether the firm advertises or not. 

We will appreciate knowing of in- 
stances of violation of Seal use. 
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introducing, 





The Intelligent Choice... 




(89.95 CDN) 



DM1T IT! Your computer always had (he power, bul 
never ihe software. Now. ..Four Star Software 
_L presents a product unlike any other, Penpal! ThJ 
a package intelligent enough to help you reach new heights of 
personal productivity. Designed to be learned in less than a day, 
the entire program is quick and easy, powerful but elegant. A 
pleasure to 
Penpal 

use in- 

mti that 
all, but d<J« 

Hiding 
;re currently on the market ■ 
computer! Packages like this COBI bin I othei 

ktely sati',' 
prompt refund. 

Mlroduetor. 

loday 10 finally realize 
'lot Computer. Available directly 
; enquire at your local Computer 
dealer. 



. Twelve function Keys and a continuously displayed reminder 
line make this program easy to use, No complicated key com- 
binations or commands to remember! 

• On-line help function 

. HJ-res 51 x 24 display screen 

• Common formats and commands in all five modules make 

Mtckage easy to learn and user friendly, 

• Fast and effective 255 by 255 spreadsheet is very versatile. 

on feature* found on 
ii, and pagination. El 
data' ,1 indexed sorting capi 

inui 

ite lull color, presentation quality gr.i; 
>m your spreads! 

jph-il function. Incted 

•com feature 

i simple duniD terminal pai I 

.h other to form a truly integrated 
package unlike any you have ever experienced. These are not 
just scperatc programs that arc selectable from central menu 
like others ofler! 

• Comes in an attractive binder -.el. v,jth reference and tutorial 
manuals. Requires 64K and minimum of one disk drive. 



Order Hotline 
416-858-STAR 



Four Star Software 



P.O. Box 730 

Streetsville. Ontario 



Dealer enquiries welcome 
write or call for our 
free Catalogue. Add $2.00 
for shipping and handling 
overseas order Add $5.00 



BUSINESS 



An Annual Expense Tracking 






This system (set of three programs) allows an individ- 
ual, or possibly a small business, to maintain and 
track expenses for one year. A maximum of 135 
transactions per month for up to 100 account codes may 
be tracked by month for an entire year (12 month period). 
Each expense you wish to track must have a numeric code 
in the range of 1 through 100 with a description not 
exceeding 27 characters. The system provides for screen 
display and printing of data and reports and is designed for 
use on a 64K CoCo with one disk drive and a DMP-100 
printer. In addition to maintaining actual transaction data, 
the system provides budgetary analysis for accounts over 
the year. This feature allows for comparative analysis of 
actual versus budget for an account (display and printout). 
It should be noted that budget or transaction summary 
amounts for an account cannot exceed $99,999.99 and a 
detailed transaction entry for an account cannot be greater 
than $9,999.99. 

Before proceeding, a discussion of a few basic concepts 
employed in the design of the system and programs is 
warranted. The programs feature extensive use of arrays 
which facilitate fast display of data and fast data entry and 
maintenance. The disk file access methods are extremely 
simple and straightforward and, for the most part, use array 
concepts. This extensive utilization of arrays in the 
programs yields a system which is both efficient and 
inefficient, but overall it provides an effective and simple- 
to-use-and-understand method for tracking expenses. 

The design of the system requires that an entire diskette 
be dedicated for the recording of budgeted and actual 
expenditures for a year. If you utilize diskette backup for 
your files and system programs, then two diskettes will be 
required for one year of data (assuming you have only one 
backup diskette). Although the system can be used without 
a printer, one is highly recommended to achieve best results. 
As mentioned previously, the system consists of three 
programs. One program (Crexpfle) creates the basic files 
required for system utilization. The system will not run until 
this program has been successfully executed. The second 
program (Exptrakr) allows the entry and maintenance of 
all budget and actual data. It also permits various screen 
displays of the data (both budget and actual). The third 
program (Reptgenr) prints various listings of budget and 
actual data. Execution of this program can be independent 

Eddie Hill is employed as a computer professional. He 
presently serves in a management capacity. His 
hobbies include reading, photography and home 
computing. 
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s Battle the 
st of Disk Drives 



■<y*0 



New Lower Price 

Un-DISK Drives $4&S5l 

$34.95 

You Bet! There are empty spaces in your 32K 
and 64K CoCo. The Preble VDOS Un-DISK 
helps you fill them up with PROGRAMS! 



Un-DISK uses your computer's extra 
memory like a fast disk drive. 

Un-DISK can store BASIC and MACHINE 
LANGUAGE programs. 

Un-DISK is INVISIBLE. Yup! Un-DISK 
does not interfere with normal Color Com- 
puter Operation. 

Un-DISK appears only when you type the 
magic word VDOS. 

Un-DISK comes with comprehensive in- 
structions which you may not need be- 
cause: 

Un-DISK is self-prompting and easy to 
use! 

Un-DISK is provided on cassette. 

Un-DISK is faster than a slow clumsy 
DISK DRIVE and best of all . . . 

Un-DISK is CHEAPER than a DISK DRIVE! 

Un-DISK will work even if you already own 
a disk but WHY BUY A DISK AT ALL? 

Un-DISK should be in the library of every 
serious CoCo user even if you own a disk 
says Frank J. Esser, independent reviewer 
for rainbow Magazine! 




OK sure, disk drives ARE NICE. I own one. 
But if your finances are limited, the Un-DISK 
can give you much of the power of the 
mechanical drive. Even if you already own a 
disk the Un-DISK can work like a super fast 
extra disk. 

EXTRA . . . EXTRA . . . EXTRA . . . EXTRA . . . 
Additional Power For S14.95 

Only with VDUMP for the Un-DISK! 

• VDUMP lets you make a cassette backup 
copy of everything stored in the Un-DISK. 

• VDUMP lets you save 5, 10, 15 or more 
programs on a single cassette tape file. 

• VDUMP lets you switch Un-DISKs. With a 
single load operation replace a group of 
financial programs with a set of children's 
programs. (The new VDUMP tape over- 
writes the old.) 

• VDUMP can allow you to save a whole lot 
of rainbow on tape in a SINGLE file. 

• VDUMP is the perfect companion to the 
Preble VDOS Un-DISK. 

Available from Doctor Preble's Programs, 
naturally! Bringing you fine Color Computer 
Products Since 1983! 



The Preble VDOS Un-DISK $34.95 

The Preble VDUMP $14.95 

Shipping & handling 

U.S. and Canada $1 .50 

or $5.00 to other foreign points 

VISA and MasterCard accepted 



HS^N 




Order From: 
Dr. Preble's Programs 

6540 Outer Loop 

Louisville, KY 40228 

(502) 966-8281 

Canadians may order from Kelly Software 



Exhibit 1 


MONTHLY 


TRANSACTIONS 


FOR JANUARY 


1986 




REC 


ACT 






TRAN 








NUM 


NUM 




I.D. 


DA . 


. AMOUNT . . 


TRANS . DESCRIPTION 


1 


1 


HOUSE MORTGAGE 




100 


31 


200.00 


PAYMENT 


2 


2 


INSURANCE 




50 


31 


1pp. 00 


PREMIUM 


3 


3 


BANK CARDS 




125 


31 


150.00 


PAYMENT 


4 


4 


ELECTRICITY 




150 


31 


125.00 


BILL 


5 


5 


AUTO PAYMENT 




11^ 


31 


180.00 


PAYMENT #10 


6 


6 


GROCERIES 




90 


15 


175.00 


W.D. 


7 


7 


CLOTHING 




95 


25 


80.00 


JIM'S 


8 


8 


MISCELLANEOUS 




98 


28 


75.00 


SOFTWARE 


9 


6 


GROCERIES 




99 


31 


245.00 


J&D GROCERY 


10 


7 


CLOTHING 




134 


31 
-> $ 


30.00 
1,360.00 


SHOES 







of Expirakr or may be selected from the main menu of 
Expirakr. After execution of Reptgenr you may return to 
Expirakr by exercising the appropriate selection option 
from the main menu of Reptgenr. You may freely transfer 
between Expirakr and Reptgenr or run either as a stand- 
alone program. It is important that you name the programs 
"Exptrakr" and "Reptgenr" because these are the names 
used in the call routines for the programs. 

Both Exptrakr and Reptgenr are menu driven programs 
with submenus, instructions and comments as required. 
This approach offers easy access to (and exits from) routines 
within the programs. As with all BASIC programs, if you 
wish to exit a routine before completion, you may hit the 
BREAK key. Use extreme caution when exercising this 
option. An entire file or files can be easily "garbaged." 
Therefore, it is not recommended. You may want to consider 
a BREAK disable routine in the programs. 

Crexpfle 

Crexpfle creates the basic files for the system. It merely 
formats and sizes the following files: 

Budget Summary 
Transaction Summary 
Chart of Accounts 
Detail Transaction Filenames 

It must be executed before attempting to run Exptrakr or 
Reptgenr. 

Exptrakr 

This program is the heart of the system. It allows for entry 
and maintenance of all data utilized by the system. This 
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. 




BUDGET FOR JANUARY 


L986 






ACT 


< — D E S C R I 


P T I 


N — > 


. . AMOUNT . . 


1 
2 
3 
4 

5 

6 

7 
8 


HOUSE MORTGAGE 
INSURANCE 
BANK CARDS 
ELECTRICITY 
AUTO PAYMENT 
GROCERIES 
CLOTHING 
MISCELLANEOUS 




TOTAL 


200.00 
50.00 
100 . 00 
150.00 
180.00 
400 . 00 
100 . 00 
50.00 

1,230.00 



includes charts of accounts, budget and transaction data. 
Exptrakr opens up with a main menu consisting of 14 
options. The main menu appears as shown below. 

1) Add/ change/ input budget 

2) Account YTD summary trans. 

3) Account actual vs. budget 

4) Account budget for year 

5) Chart of accounts maint. 

6) Display chart of accounts 

7) Add/ chg/ del/ input trans. 

8) Display monthly budget 

9) Display monthly trans. 

10) Display actual vs. budget 

1 1) Report generator 

1 2) File deletion 

13) Backup files 

14) End session 

A discussion of each option follows. 

1) Add/ Change I Input Budget 

Allows input and maintenance of budget data for an 
account. You select the month you wish to enter or change 
by entering the appropriate number for the month (1-12). 
If you wish to enter or change data for all months, enter 
"99." You return to the main menu by entering '0'. 

2) Account YTD Summary Transaction 

A display of a specified account showing summary amounts 
by month. Pressing ENTER returns you to the main menu. 

3) Account Actual vs. Budget 

Permits display of summarized actual versus budget 
amounts for a month or year-to-date through a given 
month. 

4) Account Budget For Year 

Displays the yearly budget month by month for an account. 

5) Chart of Accounts Maintenance 

As stated earlier, each expense you wish to track must have 
a numeric code in the range I through 100 and a description 
not exceeding 27 characters. The first five positions of the 
description cannot be "XXXXX" since this denotes to the 
system that the account has not been established for use. 
If you inadvertently enter a description with more than 27 
characters or "XXXXX" in the first five positions, the 
system will prompt you to re-enter the description. 
This selection gives you three options as follows: 

Option 1 — Allows for the entry of account descriptions 
March 1986 THE RAINBOW 125 



in numeric order. You are first prompted for the 
description of Account 1, then Account 2 and so forth 
until you have entered descriptions for all 100 accounts. 
If you wish to terminate entry of descriptions at any point 
before Account 100, merely type THflTS ALL and press 
ENTER. The system will automatically return to the main 
menu just as it does when the description for Account 
100 has been entered. 

Option 2 — Allows for the addition or changing of 
account descriptions. The same procedure is used to add 
or change an account description. A prompt appears that 
asks for the account number. After entering a valid 
account number the account number and description will 
be displayed. You will be asked if this is the account you 
wish to add or change. If so, type YES and press ENTER. 
If not, type NO and ENTER. After entering a changed or 
added account description you will be asked if you wish 
to add or change any more account descriptions. The 
process will repeat as long as you respond "yes." A "no" 
response will return you to the main menu. 

Option 3 — Choosing this option will return you to the 
main menu. 



6) Display Chart of Accounts 

Allows for the display of all account numbers with their 
descriptions (Option 1) or for a single account number with 
its description (Option 2). If an account description is all 
X's, it has not been set up for use by the system. Option 
3 returns you to the main menu. 

7) Add) Chgj Dell Input Transaction 

Permits the entry and maintenance of detail transactions 
(expenses) for a selected month. 

Option I — This allows the entry of detail expenses for 
a selected month. You are asked for the number of the 
month (1-12). The program then checks to see if 
transactions have already been entered for the month 
selected. If so, you cannot re-enter the transactions unless 
you delete the entire month's transaction file (see 
Selection 12, File deletion, for instructions). If transac- 
tions for the month you wish to enter are not on file, the 
program allows you to continue and prompts you 
through entry of your expenses. Please notice the 
program assigns each entry a record number which will 
be used for changing or deleting transactions, if neces- 
sary, in the future. Each addition to a month's transac- 
tion must be assigned a record number. This must be an 
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JAN 


FEB 


MAR 


APR 








MAY 


JUN 


JUL 


AUG 




BUDGET FOR 1986 


SEP 


OCT 


NOV 


DEC 




HOUSE MORTGAGE 
1 TOTAL.. $ 


2,400.00 


200.00 
200 . 00 
200.00 


200.00 
200.00 
200 . 00 


200.00 
200.00 
200.00 


200.00 
200.00 
200.00 




INSURANCE 

2 TOTAL.. $ 


600.00 


50.00 
50.00 
50.00 


50.00 
50.00 
50.00 


50.00 
50.00 
50.00 


50.00 
50.00 
50.00 




BANK CARDS 
3 TOTAL.. $ 


±,200.00 


100 . 00 
100 . 00 
100 . 00 


100.00 
100.00 
100.00 


100.00 
100.00 
100.00 


100.00 
100.00 
100.00 




ELECTRICITY 
4 TOTAL.. $ 


1,800.00 


150.00 
150.00 
150.00 


150.00 
150.00 
150.00 


150.00 
150.00 
150.00 


150.00 
150.00 
150.00 




AUTO PAYMENT 
5 TOTAL.. $ 


2,160.00 


180.00 
180.00 
180.00 


180.00 
180.00 
180.00 


180.00 
180.00 
180.00 


180.00 
180.00 
180.00 




GROCERIES 

6 TOTAL..$ 


4,800.00 


400 . 00 
400.00 
400.00 


400.00 
400.00 
400.00 


400.00 
400.00 
400.00 


400.00 
400.00 
400.00 




CLOTHING 

7 TOTAL.. $ 


1,200.00 


100.00 
100 . 00 
100 . 00 


100.00 
100.00 
100.00 


100.00 
100.00 
100.00 


100 . 00 
100 . 00 
100 . 00 




MISCELLANEOUS 
8 TOTAL.. $ 


600.00 


50.00 
50.00 
50.00 


50.00 
50.00 
50.00 


50.00 
50.00 
50.00 


50.00 
50.00 
50.00 




TOTAL BUDGET FOR YEAR 
999 TOTAL.. $ 14,760.00 


1,230.00 
1,230.00 
1,230.00 


1,230.00 
1,230.00 
1,230.00 


1,230.00 
1,230.00 
1,230.00 


1,230.00 
1,230.00 
1,230.00 


1 


26 THE RAINBOW March 1986 











Exhibit 4 






JAN 


FEB 


MAR 


APR 






MAY 


JUN 


JUL 


AUG 


ACTUAL FOR 1986 




SEP 


OCT 


NOV 


DEC 


HOUSE MORTGAGE 
1 TOTAL.. $ 


200.00 


200 
P 



00 
00 
00 


P- 

P 

P 


00 
00 
00 








00 
00 
00 







00 
00 
00 


INSURANCE 

2 TOTAL.. $ 


100.00 


100 
P 



00 

00 
00 



P 




00 
00 
00 




P 




00 
00 
00 








00 
00 
00 


BANK CARDS 
3 TOTAL.. $ 


150. #0 


150 

P 

P 


00 
00 
00 


P 


00 
00 

00 




P 


00 
00 
00 


P 





00 
00 
00 


ELECTRICITY 
4 TOTAL.. $ 


125.00 


125 
P 
P 


00 
00 
00 






00 
00 
00 


P 



p 


00 
00 
00 


P 





00 
00 
00 


AUTO PAYMENT 
5 TOTAL.. $ 


180.00 


180 
P 


00 
00 
00 







00 
00 
00 


p 

p 


00 
00 
00 







00 
00 
00 


GROCERIES 

6 TOTAL. .$ 


420.00 


420 


00 
00 
00 





00 
00 
00 


P 
P 




00 
00 
00 





00 
00 
00 


CLOTHING 

7 TOTAL.. $ 


110.00 


110 
P 




00 
00 
00 






00 
00 
00 


P 






00 
00 
00 







00 
00 
00 


MISCELLANEOUS 
8 TOTAL.. $ 


75.00 


75 




00 
00 

00 



P 




00 
00 

00 







00 
00 

00 




P 


00 
00 
00 


TOTAL ACTUAL FOR 
999 TOTAL.. $ 1 


YEAR 
,360.00 


1,360 
P 


00 
00 

00 







00 
00 
00 





00 
00 
00 







00 
00 
00 























unused number in the range 1-100. More on changes, 
deletions and additions later. 

The entry of detail transactions requires a valid 
account number for each transaction. Therefore, you 
must set your chart of accounts file up prior to using this 
option. Other information you must enter is as follows: 

Date — This is the day the transaction occurred. 

Trans. I.D. — A one- to four-digit identifying tag (e.g., 
check number). May be alphabetic or numeric. 

Amount — The amount of the transaction (not to 
exceed 59,999.99) may be debit or credit. 

Description — This is an optional identification, not 
exceeding 14 characters, for the transaction (e.g., 
monthly payment). 

When the entry of the detail transaction is complete, 
press enter. This writes the transaction to the file and 
returns to a fresh transaction entry screen for input of 
the next transaction. Upon completing the entry of all 
detail transactions for the month, enter "ZZZ" in the 
account number field and press ENTER. This will 
complete the writing of the transaction file and post 
transaction summary totals for the month. After this is 
complete you are returned to the data entry submenu. 



Option 2 — Allows the entering of new information for 
a transaction which has already been entered. You must 
specify the month and the record number of the transac- 
tion (shown on detail printout of month's transactions) 
you wish to change. A check is made to ensure that you 
have entered a correct record number. If the record 
number is valid, the transaction is displayed. Next, you 
are asked if it is the one you wish to change. If so, all 
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TRANSACTION SUMMARY FOR 1986 


•A/0 01/31/86 


ACT 


. . . .ACCOUNT DESCRIPTION. . . . 


. ..AMOUNT. . . 


1 
2 
3 
4 

5 
6 

7 
8 


HOUSE MORTGAGE 
INSURANCE 
BANK CARDS 
ELECTRICITY 
AUTO PAYMENT 
GROCERIES 
CLOTHING 
MISCELLANEOUS 


200.00 

100 . 00 
150.00 
125.00 
180.00 
420.00 
110.00 
75.00 




TOTAL 


$ 1,360.00 
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Exhibit 6 










ACTUAL VS. BUDGET FOR JANUARY 198 6 








ACT 


. . .D E S C R I 


P T I N. . . 


. .ACTUAL. . 


. . . BUDGET . . 


. .VARIANCE. 


1 


HOUSE MORTGAGE 




2pp. pp 


20p.pp 


0.00 


2 


INSURANCE 




1PP 


00 


5p 


00 


50 


00- 


3 


BANK CARDS 




150 


00 


100 


00 


5p 


00- 


4 


ELECTRICITY 




125 


00 


150 


00 


25 


00 


5 


AUTO PAYMENT 




18p 


00 


180 


00 





00 


6 


GROCERIES 




420 


00 


400 


00 


20 


00- 


7 


CLOTHING 




110 


00 


100 


00 


10 


00- 


8 


MISCELLANEOUS 




75 


00 


50 


00 


25 


00" 






TOTAL > $ 


1,3 60.00 


$ 1, 230. pp 


$ 130.00- 



Exhibit 7 

YEAR TO DATE A/O JANUARY 1986 








ACT 


. . .D E S C R I 


P T I N. . . 


. . .ACTUAL. . 


. . . BUDGET . . 


. .VARIANCE. 


1 
2 
3 
4 
5 
6 
7 
8 


HOUSE MORTGAGE 
INSURANCE 
BANK CARDS 
ELECTRICITY 
AUTO PAYMENT 
GROCERIES 
CLOTHING 
MISCELLANEOUS 




200.00 
100.00 
150.00 
125. pp 
18p.pp 
42p.pp 
lip.pp 
75. pp 


200. 0P 
5p.pp 
1PP.PP 
15p.pp 
180.00 
400.00 
100.00 
50.00 


0-00 
50.00- 
50.00- 
25.00 

0.00 
20.00- 
10.00- 
25.00- 






TOTAL > 


$ 1,360.00 


$ 1,230.00 


$ 130.00- 



of the data must be re-entered for the transaction (just 
as if it were new). Upon completion of entry of the new 
data for the transaction, press ENTER. This records the 
transaction on the file and asks if you wish to change 
more transactions. If you answer 'Y' then the process 
repeats, else the transaction summary file is updated and 
you are returned to the data entry submenu. 

Option 3 — This option will add new transactions (e.g., 
overlooked, not available at time data for month was 
entered) to a month's file. You must specify the record 
number for the record to be added. This may be derived 
by looking at a detail printout for the month and adding 
one to the record number shown for the last transaction. 
The program will not permit the addition of a transaction 
with an existing record number, as it checks this before 
allowing you to proceed. Once it is determined that you 
are not trying to add a duplicate record, you are 
presented with the data entry screen. The procedure from 
this point is the same as for entering change data in 
Option 2 of this selection. Instead of referring to 
transaction changes, the prompts relate to transaction 
additions. 

Option 4 — Allows you to delete a transaction from a 
month's file (e.g., a transaction was included in the wrong 
month). Again you must work with a record number, 
which may be obtained from the printout of the detail 
transactions for the month. You are asked for the deletion 
record number, then the program checks to see if it is 
valid. If so, it displays the record for a visual verification. 
You are asked if this is the record you wish to delete. A 
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response of 'N' prompts you for another record number 
while a 'Y' response deletes the record and updates the 
appropriate files. The steps from this point follow the 
same logic as options 2 and 3 in this selection, except 
comments that relate to deletions. 

Option 5 — Returns to the main menu. It should be noted 
that options 1 through 4 for this selection allow for 
submenu return in case you chose an option in error. 

8) Display Monthly Budget 

Displays budgeted account expenditures for a selected 
month. 

9) Display Monthly Transaction 

Displays the summary amount of each account's transac- 
tions for a selected month. 

10) Display Actual vs. Budget 

You have the choice of choosing a specific month or year- 
to-date through a specific month. The submenu will guide 
you. 

11) Report Generator 

This selection allows you to print out reports from the data 
you have entered. This is a separate program (Reptgenr, 
program Listing 3) and is called from this menu choice. You 
are given seven print selections plus a selection to return 
to the main program (Exptrakr) or to terminate the session. 
Details on this selection are covered in the comments on 
program Listing 3. 

12) File Deletion 

This selection allows you to delete either a budget or 
transaction file for a specified month. The appropriate 
transactions summaries are adjusted. After completion of 



this option, data for a given month (budget or transaction) 
may be re-entered. 

13) Backup Files 

The method used is the single disk copy procedure provided 
for but not documented in the Radio Shack manuals. I 
recommend at least a two-generation backup system 
(backup of current files, plus prior generation). 

14) End Session 

Choose this option when you are ready to end the program 
{Exptrakr). Remember to backup your files. 

Reptgenr 

This program provides for various listings of your data. 
A discussion of the selections follows: 

1) List Monthly Transactions 

This selection gives you a listing of all the transactions for 
a specified month. The listing is the only place where this 
detail is given. Record numbers are obtained from this 
listing. See Exhibit 1. 

2) List Monthly Budget 

This option provides a listing of the budget amounts for 
each account with budgeted expenditures in a specified 
month. See Exhibit 2. 

3) List Budget For Year 

Provides a month-by-month listing of each account's 
budgeted amounts for the year. See Exhibit 3. 

4) List Actual For Year 

Provides a month-by-month listing of each account's actual 
amounts for the year. See Exhibit 4. 

5) List Transaction Summary For Year 

Provides a summarized listing of all account amounts 
entered. See Exhibit 5. 

6) List Month Actual vs. Budget 

Provides a summarized listing of account versus budget 
amounts for a chosen month. A difference (variance) 
between actual and budget is shown. Credit (-) amounts in 
the variance column are unfavorable (over budget) while 



Exhibit 8 




ACT 


< — D ESCRIPTIO N — > 


1 


HOUSE MORTGAGE 


2 


INSURANCE 


3 


BANK CARDS 


4 


ELECTRICITY 


5 


AUTO PAYMENT 


6 


GROCERIES 


7 


CLOTHING 


8 


MISCELLANEOUS 



debit variances are favorable (under budget). See Exhibit 
6. 

7) List YTD Actual vs. Budget 

Provides the same information as Selection 5, except it 
reflects data through a specified month. See Exhibit 7. 

8) List Chart of Accounts 

Allows for a listing of your chart of accounts. This is a handy 
reference listing. See Exhibit 8. 

9) Return to Main Program 

This option returns you to the main program, Exptrakr, to 
continue other activities. 

10) End Session 

Select this option if you wish to terminate the program. 

Although this set of programs offers various options for 
use in budgeting and tracking expenses, enhancements such 
as displaying all account detail expenditures for a year or 
allowing for more transactions in a month can be made. It 
is hoped that the programs are helpful and create an interest 
in expanding their usefulness. May all of your expenditures 
be small. 

(Any questions relating to these programs may be 
directed to Eddie Hill at 124 Sterling Drive, Hueytown, AL 
35023; phone 205-491-1452. Please include an SASE when 
writing.) □ 




Listing 1: CREXPFLE 

ft CLS: PRINT "CREATE FILES FOR EXP 
ENSE TRACKING AND MANAGEM 
ENT" : PRINT: PRINT "AUGUST 1985" : PR 
INT : PRINT STRING$ (32,"-");: PRINT 
"EDDIE HILL": PRINT" 12 4 STERLING 
DRIVE": PRINT "HUEYTOWN, AL 35023" 
:PRINT"(205) 491-1452" 
2 PRINT STRING$(32,"- H ) :PRINT"RE 
QUIREMENTS : " : PRINT : PRINT" 64K COC 
DISK BASIC 1.1":PRINT"DISK DRI 
VE " ; : F0RI=1T09 9 9 9 : NEXTI 
5 CLS:PRINT@128,"ENTER YEAR - 19 
XX. " ; : INPUTYEAR 

7 IF YEAR <1986 THEN 5 

8 CLS: PRINT© 12 8, "I AM FORMATTING 
THE BUDGET FILE FOR"; YEAR 



10 OPEN "D",#l, "BUDGET/DAT", 128 

20 FOR I=1TO100 

25 WRITE #1,YEAR 

30 FOR X=1T012 

40 WRITE #1,00000.00 

50 NEXTX 

60 PUT #1,1 

70 NEXTI 

80 CLOSE #1 

85 CLS:PRINT§128,"I AM FORMATTIN 

G THE CHART OF ACCOUNTS FILE 

FOR"; YEAR 

90 OPEN "D",#1,"CHRTACCT/DAT",30 

95 FORI=1TO100 

100 WRITE #1,"XXXXXXXXXXXXXXXXXX 

XXXXXXXXX" 

110 PUT #1,1 

120 NEXTI 

130 CLOSE#l 

13 5 CLS:PRINT@12 8,"I AM FORMATTI 

NG THE TRANSACTION FILE FOR"; YEA 

R 

140 OPEN "D",#1,"TRANSFLE/DAT",1 
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The Ultimate 
Color Computer 

Enhancements 
for Productivity 
from HJL Products 




- •-"//„. 



WGoWStar 




To achieve maximum productivity with 
your Color Computer, you have to make 
It as easy as possible to get information 
Into and out of the system. 

This Is why we developed the HJL 
family of high-performance 
enhancements for ALL MODELS of the 
Color Computer. 

The Keyboard - $79.95 

The overwhelming favorite of serious 
Color Computer users worldwide, the 
HJL-57 keyboard has the smooth, 
consistent feel and reliability you need 
for maximum speed with minimum 
Input errors. Includes 4 Function Keys 
and sample function key program. 
Installs in just a few minutes with no 
soldering. 

The Numeric Keypad - $89.95 

The NumberJack is a self-contained, 
cable-connected keypad for heavy-duty 
number-crunchers. Besides the number 
keys, it has all the cursors, symbols 
and math keys, Including autoshifted 
(one-touch) ADD and MULTIPLY. 
Comes complete with 3-foot cable and 
all necessary connectors for quick and 
easy Installation without soldering. 



The Monitor Adapter ■ $25.95 

This universal driver works with all 
monochrome monitors, and is easily 
installed without clips, jumpers or 
soldering (except in some later CoCo 2s 
with soldered-in video chips). Here's 
crisp, clear, flicker-free monitor output 
with all the reliability you've come to 
expect from HJL Products. 

The Monitor - $89.95 

The GoldStar high-resolution amber 
monitor brings you the monochrome 
display that's preferred by most 
computer professionals today. Once 
you've used it you'll never connect your 
computer to a TV set again. The 12- 
inch diagonal CRT has an etched non- 
glare faceplate. (Requires adapter sold 
below) 

The BASIC Utility ■ $25.95 

Quick Basic Plus, a high-performance 
programming utility, can be used with 
any color computer that has four func- 
tion keys. 26 pre-defined BASIC 
statements, 10 user-defined macros at 
a time (you can save as many sets of 
macros as you like), automatic line- 
numbering, word wrap, global search, 



and Instant screen dump to printer, 
make this software the BASIC pro- 
grammer's dream come true. Comes 
with re-legendable 3-way reference 
chart. Specify disk or cassette. 

The HJL Warranty 

Every HJL product comes with a full, 
one-year warranty and the exclusive 
HJL 15-day unconditional guarantee 
(except software). 

Pick a Pair & Save 15% 

Now, for a limited time, we'll give you 
15% off the price of any two or more 
products shown here. Just mention 
this ad when you order. 

Call Now, Toll Free 

1-800-828-6968 

In New York 1-300-462-4891 
International calls: 716-235-83S8 



Ordering Information: Specify model (Original, F-version, or CoCo 2 Model Number), Payment by C.O.D., check, 
MasterCard, or Visa. Credit card customers Include complete card number and expiration date. Add 12.00 for 
shipping, 3.50 to Canada; except monitors (call for shipping charges before ordering monitors). New York state 
residents add 7% sales tax. Dealer Inquiries Invited 



PRODUCTS 

Div. of Touchstone Technology Inc. 

955 Buffalo Road • P.O. Box 24954 
Rochester, New York 14624 



28 

150 FORI=1TO100 
152 WRITE #1,YEAR 
155 F0RX=1T012 
160 WRITE #1,00000.00 
170 NEXTX 
180 PUT #1,1 
190 NEXTI 
200 CLOSE #1 

210 CLS:PRINT@128, "I AM FORMATTI 
NG THE DETAIL TRANSACTION F 
ILENAME FILE FOR ";YEAR 
220 OPEN "D",#l, "FILENAME/DAT", 2 
1 

230 F0RI=1T012 

240 WRITE #1,YEAR,"ZZZZZZZZ/ZZZ" 
250 PUT #1,1 
260 NEXT I 
2 70 CLOSE #1 

275 CLS:PRINT@128,"I HAVE FINISH 
ED. FORMATTING THE FILES FOR THE 
EXPENSE TRACKING AND MANAGEMEN 
T PROGRAMS. YOU MAYNOW USE THE P 
ROGRAMS . " : PRINT 
280 END 



^ 



40 .... 


...146 


5320 . . 


..195 


208 ... 


...248 


5526 . . 


..230 


420 .. . 


...136 


5580 . . 


....7 


736 .. . 


...196 


5760 .. 


....1 


940 .. . 


...128 


5950 . . 


..189 


2440 . . 


....85 


7036 . . 


..244 


3020 . . 


....69 


8990 . . 


..220 


3230 . . 


...185 


9031 .. 


..111 


4022 . . 


...177 


10002 . 


...30 


4540 . . 


...129 


11800 . 


..193 


5002 . . 


...179 


11960 . 


..172 


5025 . . 


...242 


11986 .. 


..171 


5057 . . 


...187 


12015 . 


...48 | 


5145 . . 


...137 


END 


84 


^M 



Listing 2: EXPTRfiKR 

PCLEAR1 

5 CLS0 

6 PRINT" EXPENSE TRACKING & MANA 
GEMENT" 

12 PRINT@64,STRING$(32,"$") ; : PRI 
NT" author 

";: PRINT" EDDIE HIL 

L": PRINT" 124 STERLING DRI 
VE": PRINT" HUEYTOWN, AL 35 
023" .-PRINT" (205)491-145 

2": PRINT STRING$(32,"$") ; : 
15 PRINT" requirements 

"; : PRINT" 64K COCO D 
ISK BASIC 1.1": PRINT" 



DISK DRIVE": PRINT" DMP 10 
PRINTER" : PRINTSTRING$ (32,"$"); 

19 PRINT@481, "PART 1============ 

=AUGUST 1985";: 

20 P=64:F0RI=1T012:PRINT§P, "$" ; : 
PRINT@P+31, "$"; :P=P+32: NEXTI: FOR 
X=1T09999: NEXTX 

2 1 DATA "JANUARY" , "FEBRUARY" , "MA 
RCH" , "APRIL" , "MAY" , "JUNE" , "JULY" 
, "AUGUST" , "SEPTEMBER" , "OCTOBER" , 
"NOVEMBER" , "DECEMBER" 

29 CLEAR3000 

30 FILES 3:DIM BAMT (12 ) , TAMT(12) 
,VAR(12) ,MO$(12) ,FL$(12) , TTOT ( 10 
0) ,DA$(100) ,CTOT(100) ,YTOT(100) 
40 FORI=lT012:READMO$(I) : NEXTI :R 
ESTORE 

45 CLS:GOT0165 

160 CLS:PRINT@134, "ONE MOMENT PL 

EASE . " : DLSW=0 : FOR I=1TO100 : DA$ ( I 

j -ii ii . CT0T ( i ) =0 : TTOT ( I ) =0 : YTOT ( I ) 

=0: NEXTI :CLS 

165 PRINT@0, "********* SELECTION 

S *********** 

180 PRINT" 
UDGET" 
190 PRINT" 
Y TRANS." 

200 PRINT" 
BUDGET" 

201 PRINT" 
YEAR" 

202 PRINT" 
MAINT." 

203 PRINT" 
CCOUNTS" 

204 PRINT" 
TRANS . " 

205 PRINT" 
DGET" 

206 PRINT" 
ANS . " 

207 PRINT" 10) 
BUDGET" 

208 PRINT"11) 
PRINT" 12) 
PRINT"13) 
PRINT" 14) 
PRINT" " 



1) ADD/ CHANGE/ INPUT B 

2) ACCOUNT YTD SUMMAR 



3) 
4) 



ACCOUNT ACTUAL VS. 
ACCOUNT BUDGET FOR 



5) CHART OF ACCOUNTS 



6) 
7) 
8) 
9) 



DISPLAY CHART OF A 
ADD/CHG/DEL/ INPUT 
DISPLAY MONTHLY BU 
DISPLAY MONTHLY TR 
DISPLAY ACTUAL VS. 



209 
210 
219 
220 
250 



REPORT GENERATOR" 
FILE DELETION" 
BACKUP FILES" 
END SESSION" 
: INPUTA 
ON A GOSUB 3 60,2210,3000,600 

, 4000 , 10000 , 5000 , 7000 , 8000 ,8990 

, 11000 , 12000 , 13000 , 18000 

2 60 GOTO160 

3 60 CLS : PRINT @ 19 2, "ENTER BUDGET 
ACCOUNT NUMBER" ; : INPUTACNO : IFACN 
O>100 OR ACNO<l THEN 3 60 ELSE 1= 
ACNO 
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365 CLS:PRINT@192,"I AM LOADING 


800 OPEN "D",#l, "BUDGET/DAT", 128 


BUDGET ACCOUNT " ; ACNO ; " . " 


805 WRITE #1,YEAR 


370 OPEN M D ,, / #1 / " BUDGET/DAT" ,12 8 


810 FOR I=1T012 


380 OPEN "D",#2,"CHRTACCT/DAT",3 


820 WRITE #1,BAMT(I) 


9> 


830 NEXTI 


3 9,0 GET #2, 1: INPUT #2 , DESC$ : CLOS 


840 PUT #l,ACNO 


E #2 


880 CLOSE #1 


395 IF MID$(DESC$,1 / 5)="XXXXX"TH 


890 RETURN 


EN4j30ELSE41/J 


900 RC=l:GOTO470 


400 PRINT :PRINT"THE ABOVE ACCOUN 


910 ' 


T DOES NOT HAVE A DESCRIPTION. I 


912 PP=80 


F YOU NEED TO USE IT YOU MUST 


915 F0RI=1T012 


ADD IT TO THE CHART OF ACCOUNT 


917 PRINT@PP,USING"% %" 


S. I AM GOING BACK TO THE MAIN 


;STRING$(10," ") 


MENU.": CLOSE* 1: FOR T=l TO 6000 : 


920 PRINT@PP,""; : INPUTBAMT ( I ) 


NEXT T: GOTO 160 


930 PRINT@PP,USING"$#####.##-";B 


410 GET #1,1 


AMT(I) 


415 INPUT #1,YEAR 


940 PP=PP+32 


420 FOR I=1T012 


950 NEXTI :RC=0:GOTO4 70 


430 INPUT #1,BAMT(I) 


2210 CLS: PRINT© 12 8, "ENTER TRANS. 


460 NEXTI 


ACCOUNT NUMBER" ; : INPUTACNO : IFAC 


465 CLOSE #1 


NO>100 OR ACN0<1 THEN 2210 ELSE 


470 CLS 


I=ACNO 


607 PRINT DESC$ 


22 20 CLS:PRINT§128,"I AM LOADING 


610 PRINT YEAR;" BUDGET AMO 


TRANS. ACCOUNT "/ACNO;"." 


UNT" 


2 2 30 OPEN "D",#1,"TRANSFLE/DAT", 


620 SUMBUD=0 


128 


630 FOR 1=1 TO 12 


2240 OPEN "D",#2,"CHRTACCT/DAT", 


640 PRINT USING"% %% 


30 


%#####. ##-";M0$ (I) ;SPACE$;BAMT(I 


2250 GET #2, I: INPUT #2,DESC$:CLO 


) 


SE #2 


650 SUMBUD=SUMBUD+BAMT(I) 


2260 GET #1,1 


660 NEXTI 


2265 N=I 


670 PRINT@80,USING"$#####.##-";B 


2270 INPUT #1,YEAR 


AMT(l) 


2280 FOR I=1T012 


675 IF RC=1 THEN 910 


2290 INPUT #1,TAMT(I) 


680 PRINT@448,USING"% 


2 300 NEXTI 


%$#####.##-";" TOTAL ";SUMB 


2 310 CLOSE #1 


UD 


2320 CLS 


685 IFBSW=1THEN6010 


2360 PRINTDESC$ 


690 PRINT@480,"1-12=MO : 99=ALL 


2380 PRINT YEAR;" TRANS. AM 


: 0=MENU : " ; : INPUTAN 


OUNT" 


710 IFAN=0THEN790 


2400 TRNBAL=0 


712 IF AN=99 THEN 720 


2410 FOR 1=1 TO 12 


713 IF AN <1 OR AN >12 THEN 690 


2420 PRINT USING"% %% 


720 CLS 


%#####. ##-";MO$ (I) ;SPACE$;TAMT( 


7 30 N=AN 


I) 


73 6 PRINT 


2 430 TRNBAL=TRNBAL+TAMT ( I ) 


745 PRINT 


2440 NEXTI 


750 PRINT DESC$ 


2450 PRINT@80,USING"$#####.##-"; 


755 IF AN=99 THEN 900 


TAMT ( 1 ) 


756 PRINT 


2460 IF RC=1 THEN 2710 


760 PRINTUSING "% %$# 


2470 PRINT@448,USING"% 


####.##-";MO$(N) ;BAMT(N) 


%$#####.##-";" TOTAL ";TRN 


770 PRINT: INPUT" NEW AMOUNT" ;BA 


BAL 


MT(N) 


2480 PRINT@480, "<ENTER> FOR MAIN 


780 GOTO470 


MENU."; :I$=INKEY$:IFI$<> CHR$(1 


790 CLS:PRINT@128,"I AM WRITING 


3) THEN 2480 ELSE 160 


BUDGET ACCOUNT ";ACNO;"." 


2610 CLS:PRINT§410, "I AM REWRITI 
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Enjoy Your RAINBOW Programs 

with the Greatest of Ease 
Subscribe to RAINBOW ON TAPE! 



Each month, rainbow on tape gives you as many as two dozen ready-to- 
run programs from the current issue of the rainbow, excluding OS-9 
programs and those less than 20 lines. With just a one-year subscription, you'll 
receive more than 230 new programs. And, using the documentation provided 
by the magazine, all you have to do is load and run them. 



Need a back issue of rainbow on tape? 
Issues available beginning with April 1982 




Subscribe to rainbow on tape Today! 

LOOK FOR OUR ORDER CARD 
BETWEEN PAGES 34 AND 35 

The cost for a single copy of rainbow on 
tape is $10 within the United States; U.S. $12 
in all other countries. The annual subscription 
rate for rainbowon tape is $80 within the U.S.; 
U.S. $90 in Canada; and U.S. $105 for all other 
countries. U.S. currency only, please. In order 
to hold down non-editorial costs, we do not 
bill. 



NOW AVAILABLE ON DELPHI! 

For your convenience, RAINBOW ON TAPE can also be 
ordered via the Delphi Information Network in our Shopping 
Service area of the Rainbow's Color Computer SIG (Special 
Interest Group). For details on free Delphi connect time, see 
pages 234 and 235. 

The individual programs from our past utility issues are also 
available for immediate download in the Rainbow On Tape 
Database area in the Rainbow's Color Computer Sig on 
Delphi. There is a $3.50 per program surcharge. 



RAINBOWON TAPE is not a stand-alone product, but is 
intended as an adjunct and complement to the magazine. 
Even if you purchase RAINBOW ON TAPE, you will still need 
the magazine for loading and operating instructions, 

To order by phone, call: (502) 228-4492 







Programs From Our Past Business Issues: 



March 1985 — Home Financial Statement, keeps track of 
home finances; Cash Flow Rate ol Return, analyzes prospects 
(or good investments; Stock Index, gauges stock market 
performance; Convert, figures foreign exchange rates; Pert, 
an aid to project and estimate the efficient use of time: T-bill, 
computes the worth of treasury bills; Landlord's Helper, 
manages rental property; Payroll, a complete small business 
payroll package; and EOO Calc, helps find the ultimate 
bargain for economic management. Plus, Lurkley Manor, an 
all-graphics Adventure game; Demon's Defiance, a mini 
arcade game; Joystick, a tutorial on incorporating joysticks 
into programs; and eight additional programs. 

March 1984 — Inflation, determines the relationship of past 
to present dollars under permanent inflation; HouseS. figures 
the total cost impact of home ownership; Financial Analyst, 
analyzes a company's financial strength; Cost Calc, figures 
manfacturing costs; Markup and % Profit, small business aid 
to add a percentage markup to cost; Patch Painting, converts 
Micropainter to disk; Playoook, a basketball coach's aid for 
animating plays and drills; Disk Fixer, tests tracks and sectors 
for I/O Errors; and Character Sheet, prints sheets for 
cataloging dungeon characters. Plus, The Little Runner; 
Stunt Pilot: Creating Graphic Adventures; and six additional 
programs. 



NG TRANSACTION ACCOUNT " ;ACNO;". 
ii 

2 620 OPEN "D", #1, " TRANS FLE/ DAT", 

128 

2630 WRITE #1,YEAR 

2 640 FOR I=1T012 

2650 WRITE #1,TAMT(I) 

2 660 NEXTI 

2 670 PUT #l,ACNO 

2680 CLOSE #1 

2 690 RETURN 

3000 CLS :PRINT@128, "ENTER ACCOUN 
T NUMBER" ; : INPUTACNO : IFACNO100 
OR ACN0<1 THEN 3000 ELSE I=ACNO 
3010 CLS: PRINT© 12 8, "I AM LOADING 

ACCOUNT ";ACNO;"." 
3015 N=I 

3020 OPEN "D",#1,"TRANSFLE/DAT", 
128 

3030 OPEN "D",#2,"CHRTACCT/DAT", 
30 

3040 GET #2, I: INPUT #2,DESC$:CLO 
SE #2 

3050 GET #1,1 
3060 INPUT #1,YEAR 
3070 FOR I=1T012 
3080 INPUT #1,TAMT(I) 
3090 NEXTI 
3100 CLOSE #1 

3110 OPEN "D",#3,"BUDGET/DAT",12 
8 

3112 GET #3,N:INPUT #3, YEAR 
3115 FOR I=1T012: INPUT #3,BAMT( 
I) : NEXTI 

3118 CLOSE #3 

3119 CLS 

3150 PRINTDESC$ 

3170 PRINT YEAR;" ACTUAL BU 
DGET" 

3190 TRNBAL=0 
3195 SUMBAL=0:VARTOT=0 
3200 FOR 1=1 TO 12 
3205 VAR(I)=TAMT(I)-BAMT(I) 
3210 PRINT USING"% %% %####.##-% 
%#####. ##-";MO$ (I) ;SPACE$;TAMT( 
I);" M ;BAMT(I) 
3220 TRNBAL=TRNBAL+TAMT ( I ) 

3 225 SUMBUD=SUMBUD+BAMT(I) 
3227 VARTOT=VARTOT+VAR ( I ) 

3 2 30 NEXTI 

3240 PRINT@68, USING" $#####.##-%% 

$#####. ##-";TAMT(l) ;"";BAMT(1) 

3250 IF RC=1 THEN 3500 

3260 PRINT@448,USING"% %$#####. 

##-%%$#####.##-"; "TOT ";TRNBA 

L;"";SUMBUD 

3 2 70 PRINT§480,"<ENTER> FOR MAIN 

MENU . " ; : 
3275 I$=INKEY$:IFI$ <> CHR$(13) 



THEN 3275 
3280 GOTO160 

4000 CLS:PRINT"***********SELECT 
IONS***********":PRINT"l) ENTER 
ACCOUNT DESCRIPTIONS": PRINT: PRIN 
T"2) ADD/CHG ACCOUNT DESCRIPTION 
": PRINT: PRINT" 3) RETURN TO MAIN 
MENU": PRINT: PRINT: PRINT" " ; : INPU 
TA:ON A GOSUB 4010 , 4500, 160 : GOTO 
4000 

4010 CLS: OPEN "D" , #1, "CHRTACCT/D 
AT",30:PRINT"ACT < — D E S C R I 
P T I N — >": PRINT: FOR X=1TO100 
STEP 10:PP=64:FORI=X TO X+9:PRI 
NTUSING" # # # " ; I : IFRC=1THEN4050 

4020 PRINT@480,"<THATS ALL> FOR 
MAIN MENU . " ; : PRINT0PP+4 , " " ; : LINE 

INPUT DC$ 

4021 L=LEN(DC$) :IF L>27 OR LEFT$ 
(DC$,5)="XXXXX" THEN 4020 

402 2 IF DC$="THATS ALL" THEN 404 



4025 WRITE #1,DC$:PUT #1,1 

402 8 PP=PP+3 2:NEXTI 

4029 IF RC <> 1 THEN 4030 ELSE P 
RINT@416,"<ENTER> TO CONTINUE OR 

'R' FOR RETURN TO MAIN MENU."; 
:INPUTA$:IFA$=CHR$(13) THEN 4030 
ELSE IF A$="R" THEN 4040 

4030 PP=64:FORN=1TO10:PRINT§PP:P 
P=PP+3 2 : NEXTN : PRINT© 64 , " " ; : 

4031 NEXTX 

4040 RC=0: CLOSE #1:GOTO160 

4050 GET #1,1: INPUT #1,DESC$:PRI 

NT@PP+4 , " " ; DESC$ : GOTO4028 

4500 CLS: OPEN "D" , #1, "CHRTACCT/D 

AT", 30 

4510 CLS: PRINT© 12 8, "ENTER ACCOUN 

T NUMBER YOU WISH TO ADD OR CH 

ANGE"; :INPUTAC:IFAC <1 OR AO100 

THEN 4510 
4520 CLS: PRINT© 12 8, "I AM LOADING 

ACCOUNT ";AC:GET #1, AC: INPUT #1 
, DESC$ : CLOSE#l : CLS : PRINT© 12 8 , "CU 
RRENT DESCRIPTION ACCOUNT ";AC;: 
PRINT: PRINTDESC$:IFRC=1THEN10530 
4530 PRINT@256,"IF YOU WISH TO R 
ETURN TO MAIN MENU THEN ENTER 
<RET> OTHERWISE ANSWER YES OR NO 
. IS THIS THE ACCOUNT YOU WISH 

TO ADD OR CHANGE"; : INPUT A $ 
:IF A$="YES" THEN 4540 ELSE IF A 
$=»NO" THEN 4500 ELSE IF A$="RET 
" THEN 160 ELSE 4530 
4540 CLS : PRINT© 12 8 , "" ; : PRINT"NEW 

DESCRIPTION ACCOUNT ";AC:PRINT: 
PRINT""; : LINE INPUT DC$ 

4549 DSC$=LEFT$(DC$,5) 

4550 L=LEN(DC$) : IF L>27 OR LEFT$ 
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(DC$,5)="XXXXX" THEN 4540 
4555 CLS:PRINT@128,"I AM REWRITI 
NG THE CHART OF ACCOUNTS FIL 
E . " ; : 

4560 OPEN "D" , #1, "CHRTACCT/DAT" , 
30:WRITE #1,DC$:PUT #l,AC:CLOSE 
#1 

4562 CLS:PRINT@128,"DO YOU WISH 
TO ADD OR CHANGE MORE ACCOUNT 
S" ; :INPUTA$:IFA$ ="YES" THEN 450 
ELSE IF A$="NO" THEN 16j3 ELSE 
4562 

4570 GOTO 16)3 

5000 ISW=0 : CSW=0 : DSW=0 : SW=0 : CLS : 
PRINT" **********SELECTIONS****** 
*****■•: PRINT: PRINT" 1) ENTER NEW 
TRANSACTIONS" : PRINT" 2) CHANGE A 
TRANSACTION": PRINT" 3) ADD A TRAN 
SACTION":PRINT"4) DELETE A TRANS 
ACTION": 

500 2 PRINT" 5) RETURN TO MAIN MEN 
U": PRINT: PRINT" " ; : INPUTA:ON A G 
OSUB 5005, 5500, 5700, 5900, 160: GOT 
05000 

5005 CLS:PRINT@128,"I AM LOADING 
THE NAMES OF EXISTING TRA 
NSACTION FILES."; :OPEN "D" ,#1,"F 
ILENAME/DAT" , 21: F0RI=1T012 : GET # 
1,1: INPUT #1,YEAR,FLE$:FL$(I)=FL 
E$:NEXTI: CLOSE #1 

5009 IFDSW=1THEN5015ELSE5010 

5010 IFISW=1THEN5015ELSEIFCSW=1T 
HEN5015ELSEIFRC=10THEN5015ELSECL 
S: PRINT" ENTER NEW MONTH TRANSACT 
IONS" : PRINT : PRINT"WHICH MONTH ' S 
DO YOU WISH TO ENTER (1-12 OR 

99 TO RETURN TO THE MAIN MENU) 
";:INPUTMO:IF MO=99 THEN 160 ELS 
E IF MO<01 OR MO>12 THEN 5010 
5015 AP$=LEFT$(MO$(MO) ,3) :FLE$=" 
DTLTRANS/"+AP$:IF FL$(MO)=FLE$ T 
HEN 5020 ELSE IF FL$ (MO) ="ZZZZZZ 
ZZ/ZZZ" THEN 5023 

5020 IFDSW=1THEN5920ELSEIFISW=1T 
HEN5720ELSEIFCSW=1THEN5520ELSEPR 
INT:IFRC=10THEN11125ELSEPRINT"TR 
ANSACTIONS FOR THIS MONTH AL 
READY ENTERED. PLEASE ENTER A DI 
FFERENT MONTH . " ; : FORX=1TO3000 : NE 
XTX:GOTO5010 

5023 IFCSW=1 OR ISW=1THEN5550 
5025 IFRC=10THEN11120ELSE FL$ (MO 
)=FLE$:CLS:PRINT@128,"I AM REWRI 
TING NAMES OF TRANSACTIO 

N FILES TO INCLUDE THEMONTH FOR 
WHICH YOU ARE ENTERINGTRANSACTIO 
NS . " ; : OPEN "D" , #1 , "FILENAME/ DAT" 
, 21: F0RI=1T012: WRITE #1,YEAR,FL$ 
(I):PUT #l,I:NEXTI:CLOSE#l 



5030 OPEN "D",#l,FLE$ / 51:OPEN "D 
" , #2 , "CHRTACCT/DAT" , 30 : GOSUB5400 

5031 F0RN=1T0135:CLS:PRINT"TRANS 
ACTIONS FOR " ;MO$ (MO) ; " , " ; YEAR: G 
OSUB5200 

5035 PRINT@3 2,STRING$(32,CHR$(12 

8)) 

5045 PRINT© 64 , "TRANSACTION " ; : PR 

INT USING "##" ;N: 

5050 PRINT@ 12 8, "ACCOUNT » ; : 

LINE INPUT ACNO$:IF ACNO$="ZZZ"T 
HEN 5210 ELSE ACNO=VAL(ACNO$) : IF 
ACNO <1 OR ACNO >100 THEN5050 

5055 IF MID$ (DA$ (ACNO) ,1,5) ="XXX 
XX" THEN 5056 ELSE 5060 

5056 PRINT: PRINT "THE ABOVE ACCOU 
NT IS INVALID. ENTER <99> FOR 
RETURN TO MAIN MENU, OTHERWISE 

HIT <ENTER> TO RE-ENTER CORREC 
T ACCOUNT NUMBER . " : PRINT ; : INPUT 
RT : IFRT=99THEN5058 

5057 PRINT@128,STRING$(255," " ) : 
GOTO5050 

5058 CLOSE#1:CLOSE#2:GOTO5220 
5060 PRINT" ";DA$(ACNO) 

5065 PRINT"IS THIS THE CORRECT A 
CCOUNT" ; : 

5066 A$=INKEY$:IFA$=""THEN5066 

5067 IFA$="Y"THEN5070ELSEIFA$<>" 
N"THEN5066 

5068 PRINT@128,STRING$(128," "): 
GOTO5050 

5070 PRINT§192,STRING$(64," "):P 

RINT@224,"DATE(DA) ... "; :LINEIN 

PUTDT$ : DA=VAL ( DT$ ) : IFDA< 10RDA>3 1 

THEN5070 

5090 PRINT@256,STRING$(64," "):P 

RINT@2 56, "TRANS. ID.. " ; : LINEIN 

PUTCHK$ : CHK=VAL ( CHK$ ) : IFCHK< 10RC 

HK>9999THEN5090 

5110 PRINT§288,STRING$(64," "):P 

RINT@2 88, "AMOUNT. .. . " ; : LINEIN 

PUTAMT$:AMT=VAL(AMT$) :A=ABS(AMT) 

: IFA<10000THEN5120ELSE5110 

5120 PRINT§301,USING"##, ###.##-" 

;AMT 

5125 TTOT ( ACNO )=TTOT(ACNO) + AMT 

5130 PRINT@320,STRING$(64," "):P 

RINT@320, "DESCRIPTION " ; : LINEIN 

PUTPRP$ : L=LEN (PRP$) : IFL>14THEN51 

30 

5140 PST=1:YR$=STR$(YEAR) :Y$=MID 

$(YR$,4,2) :YR=VAL(Y$) : 

5145 WRITE #l,ACNO,MO,DA,YR,CHK, 

AMT,PRP$,PST:PUT #1,N 

5147 IFDSW=1THEN5990ELSEIFCSW=2T 

HEN5 600ELSEIFSW=2THEN57 70 

5150 NEXTN: CLOSE #1: CLOSE #2: GOT 

05220 
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Computer Island Educational Software 

227 Hampton Green, Staten Island, New York 10312 

(718) 948-2748 

PROGRAM TITLE GRADES MEMORY PRICE PROGRAM TITLE GRADES MEMORY PRICE 



PRESCHOOL 

Preschool I - counting Pre-K 16K Ext. 

Preschool II - adding Pre-K 16K Ext. 

Preschool III - alphabet Pre-K 16K Ext. 

Music Marvel-play songs Pre-K, 1 16K-Ext. 

Arrow Games - 6 games Pre-K, 1 32K-Ext. 

First Games - 6 games Pre-K,1 32K-Ext. 

Mr. Cocohead-facemaker K-3 16K-Ext. 

Bentley Bear Pre-K 32K-Disk 

LANGUAGE ARTS 

Beyond Words 1-3 parts 3-5 32K-Ext. 

Beyond Words 2-3 parts 6-8 32K-Ext. 

Beyond Words 3-3 parts 9-12 32K-Ext. 

Vocabulary 1-1000 words 3-5 32K-Ext. 

Vocabulary 2-1000 words 6-8 32K-Ext. 

Vocabulary 3-1000 words 9-12 32K-Ext. 

Context Clues 4,5,6.or 7 16K-Ext. 

Cocojot - jotto game 3-up 16K 

Reading Aids - 4 parts 2-4 16K-Ext. 

King Author - writing tool 2-6 16/32 Ext 

Cocowheel of Fortune 4-up 32K-Ext. 

Context Clues 2-3 32K-Ext. 



FOREIGN LANGUAGES 

French Baseball-200wds. 4-up 16K-Ext. 

French Baseball-500wds. 4-up 32K-Ext. 

Spanish Baseball-200wds 4-up 16K-Ext. 

Spanish Baseball-500wds 4-up 32K-Ext. 

Italian Baseball-200wds. 4-up 16K-Ext. 
Hebrew Alphabet beginners 16K-Ext. 
Hebrew Utility drawing ulilily 16K-Ext. 

CRITICAL THINKING PROBLEMS 

Memory Castle-Sunburst 4-up 32K-disk 

Factory by Sunburst 4-up 32K-disk 

Pond by Sunburst 2-up 32K-disk 

Teasers by Tobbs-Sunb. 4-up 32K-disk 

Inner City - simulation 7-up 32K-disk 

Find The Math Sequence 4-up 32K-Ext, 

Stranded-graphic advent. 4-up 32K-disk 

TEACHER/STUDENT AIDS 

Colorgrade - gradebook Adult 32K-disk 

Quizmaker - write quizzes 5-up 32K-Ext. 

ETT typing tutor icocowaieiiouwi 4-up 16K-Ext. 

The Puzzler (eorWConneeiiort) 4-up 32K-disk 



11.95 
11.95 
11.95 
11.95 
21.95 
24.95 
16.95 
29.95 



19.95 
19.95 
19.95 
19.95 
19.95 
19.95 
17.95 
11.95 
19.95 
29.95 
19.95 
19.95 



11.95 
19.95 
11.95 
19.95 
11.95 
11.95 
15.95 



44.95 
44.95 
44.95 
44.95 
49.95 
19.95 
24.95 



29.95 
24.95 
21.95 
29.95 



MATH 

Opening a Bank Account 4-7 32K-disk 24.95 

Dollars & Sense 2-4 16K-Ex1. 14.95 

McCoco's Menu 3-5 16K-Ext. 14.95 

Moneypak 2-5 32K-Ext. 24.95 

Graph Tutor 3-7 32K-Ext. 19.95 

Graph-It 7-up 16K-Ext. 14.95 

Math Invaders 1-8 16K-Ext. 17.95 

Mathquiz - 4 operations 2-5 32K-Ext. 19.95 

Addition & Subtraction 2-3 16K 11.95 

Skill Tutor Series 

Division Tutor 3-7 16K-Ext. 14.95 

Multiplication Tutor 3-7 16K-Ext. 14.95 

Factors Tutor 5-8 16K-Ext. 19.95 
Fractions Tutors o programs) 

addition, subtraction or multiplication 4-8 16K-Ext. 19 95ea 

Trigonometry 8-10 32K-Ext. 24.95 

Equations Linear 7-9 32K-Ext. 19.95 

Equations Quadratic 8-11 32K.Ext. 19.95 

Arith. Diagnostic Disk 3-8 32K-disk 49.95 

Fraction Diagnostic Disk 4-9 32K-disk 49.95 

Verbal Problems Series 

Distance Problems 5-8 32K-Ext. 19.95 

Area & Perimeter 5-8 32K-Ext. 19.95 

Pizza Game 3-5 32K-Ext. 19.95 

Sales & Bargains 6-8 32K-Ext. 19.95 

Comparison Shopping 4-7 32K-Ext. 19.95 

Binary Dice Game 4-up 32K-Ext. 19.95 

SOCIAL STUDIES 



Know Your States 


5-up 


32K-Ext. 


19.95 


History Game 


5-up 


32K-Ext. 


14.95 


States & Capitals 


5-up 


32K-Ext. 


19.95 


Explorers & Settlers 


4-up 


32K-Ext. 


19.95 


Famous American Women 


6-up 


32K-Ext. 


19.95 


Street Map Game 


3-5 


32K-Ext. 


19.95 


MISCELLANEOUS 








Name That Song 1,2,or3 2-up 


16K-Ext. 


11.95 


Music Drill 


3-up 


16K-Ext. 


19.95 


Science Game 


8-up 


32K-disk 


29.95 


Computer Literacy 


6-up 


32K-Ext. 


19.95 


5 Educational Programs 


1-2 or 






with Lightpen 


3-6 


32K-disk 


44.95 


Chemistry Tutor 


10-up 


32K-disk 


29.95 




Disk indicates available on disk only. 

Tape prices given. 

Add $5.00 for any program on disk. 



The Educational Answers 
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SCIENCE GAME 

32K EB - disk only/$29.95 
Over 600 questions in 9 categories. 
Makes learning science facts fun. 
Game format, 1 or 2 players, teams. 
Grade 8 and up. 




STREET MAP GAME 
32K - $19.95 tape/$24.95 disk 
Hi-res. screen and graphics portray 
a typical section of a street map. This 
one shows people's homes, the 
school, the park, etc Questions on 
how to get from one place to another 
are asked and the footsteps are 
shown. 

CHEMISTRY TUTOR 

32K - disk only - $29.95 
A hi-res. 4 part program that drills 
high school students in Elements, 
Symbols, Naming Compounds, 
Common Ions, and Balancing Equa- 
tions. Correct answer given after 2 in- 
correct responses. A valuable lool for 
studying chemistry 

5 LIGHTPEN PROGRAMS 

32K EB - $44.95 
Five menu driven educational pro- 
grams designed for children in grade 
1 and 2, and special educational 
students Basic addition, basic 
multiplication, shape series mat- 
ching, number series matching and 
word rhyming are included. All on a 
HI-RES screen, with graphics. User 
need only to use the light pen to 
operate the programs (LIGHT PEN 
INCLUDED) 



VERBAL MATH PROBLEMS 

PIZZA GAME 
32K EB - tape/S19.95 
Learn to locate coordinates on a 
grid. HI-RES text and graphics. 



AREA & PERIMETER 

32K EB - tape/$19.95 
Triangles, rectangles, and circles 
are covered in this HI-RES text and 
graphics program. 



SALES & BARGAINS 

32K EB - tape/$19.95 
Learn to find the discounted price. 
HI-RES text and beautiful graphics. 



DISTANCE PROBLEMS 

32K EB - tape/$19.95 
Moving graphics and text combines 
on a HI-RES screen. Rate x Time = 
Distance in all its forms. 



ATTENTION 

TANDY 1000 USERS 

NOW AVAILABLE! EACH S34.95 
4 of our most effective math pro- 
grams have been converted for use 
on the popular Tandy 1000. 

1 . OPENING A BANK ACCOUNT 

2. COMPARISON SHOPPING 
3 DISTANCE PROBLEMS 

4. SALES AND BARGAINS 



OPENING A BANK ACCOUNT 

32K - Disk Only - $24.95 
A set of programs designed to in- 
troduce and provide practice in the 
skills of filing out bank applications, 
deposit and withdrawal slips, and 
computing bank account balances. 
Loaded with graphic presentations. 
Grades 3-6. 



$$$ 



DOLLARS & SENSE 

16K-Ext. - $14.95 tape/$19.95 disk 
Learn to make purchases. Graphic 
displays of items kids love. Player 
buys items using dollars and coins 
to practice using money correctly. 
Solutions given. 

McCOCO'S MENU 
16K-Ext. - $14.95 tape/$19.95 disk 
America's favorite pastime-going out 
to eal. Learn lo buy and add up your 
purchases from a typical fast food 
restaurant menu. Gain skill in using 
money. Different prices each time. 

COCO WHEEL OF FORTUNE 

32K - $19.95 tape/$24.95 disk 
Hi-res. graphics and screen in this 
version of the popular TV show. 1-6 
players. Spin the wheel for poinls 
and guess a letter to solve one of the 
200 puzzles. Have fun while 
strengthening LA skills. 

COLORGRADE 
32K - disk only - S29.95 
An easy to use classioom grading 
program. Keeps grades for up to 6 
classes of up to 40 students per 
class. Many options including 
weighted averages and hard copy to 
printer. 
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(718) 948-2748 
Dept. R 227 Hampton Green, Staten Island. N.Y. 10312 

Send (or catalog with complete descriptions. 
Please add SI .00 per order t : jos.age N Y. residents, please add proper tax. FREE set ot BINARY DICE, including (ull directions, with 
ardecs. ot 2 or more items 



Dealer Inquiries Invited. 



TRS-80 Color Computer 



All Payments in U.S. Funds. 



52j3j2 PRINT@416,STRING$(32,CHR$(1 
28)) : PRINT© 448, "ENTER 'ZZZ' IN A 
CCOUNT TO END TRANSACTION ENTR 
Y . " ; : PRINT @PP , " " ; : RETURN 
521j3 CLS:PRINT§128,"I AM COMPLET 
ING THE WRITING OF THE DETAIL T 
RANSACTION FILE.";: FOR I=N TO 13 
5:WRITE #1, 999, 99 , 99 , 99 ,0/80)3 , j3j3j3 
J3# . 00 , " XXXXXXXXXXXXXXXXXX " , 1 : PU 
T #l,I:NEXTI:CLOSE #1: CLOSE #2 
5220 CLS:PRINT§12 8,"I AM POSTING 

TRANSACTION TOTALS . " 
5300 OPEN "D", #1, " TRANS FLE/ DAT" 
,128 

5302 1=0 
5305 1=1+1 

5310 GET #1,1: INPUT #1,YEAR 

5311 FOR N=l TO 12 

5312 INPUT #1,TAMT(N) 

5313 NEXT N 

5315 IFCTOT(I)<>0 OR TTOT(I)O0T 

HENTAMT ( MO ) =TAMT ( MO ) - CTOT ( I ) +TTO 

T(I) 

5320 WRITE #1, YEAR: FOR N=l TO 12 

:WRITE #1,TAMT(N) :NEXTN:PUT #1,1 

5330 IF 1=100 THEN 5340 ELSE 530 

5 

5340 CLOSE #1 

5345 FORI=1TO100:TTOT(I)=0:CTOT( 



I ) =0 : NEXTI : F0RI=1T012 : TAMT ( I ) =0 : 
NEXTI 

5350 GOTO5000 

5400 CLS:IFCSW=2 OR SW=2 THENRET 
URNELSEPRINT@128,"I AM LOADING A 
CCOUNT DESCRIPTIONS . " 

;:FORI=1TO100:GET #2, I: INPUT #2, 
DA$ ( I ) : NEXTI : RETURN 
5500 CLS: PRINT@ 12 8, "WHICH MONTH' 
S TRANSACTIONS NEED CHANGING (99 
FOR MAIN MENU) " ; : INPUTA: IFA=99T 
HEN160ELSEIFA<1ORA>12THEN5500ELS 
E5510 

5510 MO=A:CSW=l:GOTO5005 
5520 OPEN "D",#1,FLE$,51 
5522 CLS: PRINT@ 12 8, "WHAT IS THE 
RECORD NUMBER OF THETRANSACTION 
YOU WISH TO CHANGE (999 FOR RET 
URN TO MENU) " ; : INPUTRNO : IFRNO=99 
9THEN5560ELSEIFRNO<1ORRNO>135THE 
N5522ELSE5525 

5525 GET #l,RNO: INPUT #l,ACNO,MO 
, DA , YR , CHK , AMT , PRP$ , PST : IFACNO=9 
99THEN5610ELSEIFISW=1THEN57 50ELS 
EIFDSW=1THEN5950ELSECLS : PRINT"CH 
ANGES FOR " ;MO$ (MO) ; " , " ; YEAR: PRI 
NT@32,STRING$(32,CHR$(128) ) 

5526 PRINT® 64, "RECORD NUM. ";RN 




J&RNOWHAS512K 
EASY SOLDERLESS INSTALLATION 



Includes 35/40 TRACK RS RAM DISK • 0S9 RAM DISK 



(Compatible with RSDOS, JDOS and ADOS) 



THE 512K RAM "BANKER" ... See 256K Featured in Sept. '85 Hot Coco! 



PCOPY 134 

BANKRPAG 

35/40TRK 
RAM DISK 

256K/512K 
MEMORY TEST 

PAGE 8X32K 

0S9BTFIX 

40TRK SINGLE 
SWAP 
MULTIPLE COPY DISK BACKUP 

32K TO 192K PRINT SPOOLER 




t\\$1> cif JSR P'oudly announces the "BANKER", a 5I2K internal board lor 
»W* ,c* BlS** 1 COCO I or COCO II lhal can be upgraded lo 32K/64K with the addi- 



nutffc* 4164 l y pe ' 8 eacr memory chips, socketed SAM and memory 

^ chips. SAM and memory chips must be socketed (or solderiess installa- 

tion. Those who have computers with 26-31XX and later model numbers call or write for 
informalion. The "BANKER" installs in the SAM (6883/74 LS 785) socket. The "BANKER" 
works with COLOR BASIC. EXTENDED BASIC, and DISK EX- 
TENDED BASIC (JDOS and ADOS). Cassette or Disk syslems. 
The "BANKER" was designed to bo compatible wilh ALL hard- 
ware and absolutely compatible with any 64K software or hard- 
ware addressing. 
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RAM DISK I 

35/40 TRACK 0S9 RAM DISK 



• • * * * INTRODUCTORY SPECIALS * * * * * 
$ 34.95 BARE-BOARD (EICHED & DRILLED). SOFTWARE and DOCUMENTATION 
$ 64.95 BARE-BOARD + PARTS. SOFTWARE and DOCUMENTATION (NO MEMORY CHIPS) 
$ 79.95 ASSEMBLED & TESTED BOARD, SOFTWARE and DOCUMENTATION (NO MEMORY CHIPS) 
S149.95 ASSEMBLED & TESTED BOARD, MEMORY CHIPS, SOFTWARE and DOCUMENTATION 
J 3,00 LONG PIN SOCKET ((or BARE-BOARD) 



J & Ft ELECTRONICS 



P.O. BOX 2572 • COLUMBIA, MD 21045 

Hours: Sat. Noon-5 pm EST; Weekdays 7 pm-9 pm EST 
Phone (301) 987-9067 or (301) 788-0861 



Add 53.00 Shipping & Handling (FOREIGN ORDERS ADD S7.00) plus COD charge (if any). Maryland 
Residents Add 5% Stato Tax CHECKS MONEY ORDERS OR CCS'?, orliy liwuvb'nivmrjiai.iinmin 

- 2 weeks lor clearance) IMMEDIATE DELIVERY. Give COCO Rad-o Shack model * (i.e. 26-3136). 
Disk or Tape when ordering QUANTITY DISCOUNT AVAILABLE, write us (include SASE please). 
We value your patronage, most upgrades will be at a nominal fee, customer returns original disk/tape 
and pays shipping and handling. 
For information on shipping or previously placed orders call (301) 788-0661. 
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5527 PRINT@128,"ACCOUNT. . . . ";A 

CNO 

5529 PRINT@160,"DATE(DA) • • • "/'D 

A 

5531 PRINT@192, "TRANS. I.D. ";C 

HK 

5533 PRINT@224,"AMOUNT " ; : 

PRINT@237, USING" ##,###.##-" ;AMT 

5535 PRINT@256, "DESCRIPTION ";P 
RP$ 

5536 IFDSW=1THEN5960ELSE5537 

5537 PRINT@384,STRING$(32,CHR$(1 
28) ) :PRINT@416,"IS THIS THE TRAN 
SACTION YOU WISHTO CHANGE" ;: INPU 
TA$:IF A$="Y" THEN 5580 ELSE IF 
A$="N" THEN 5570 ELSE 5537 

5550 CLS :PRINT@128, "TRANSACTIONS 

FOR THE MONTH YOU ENTERED ARE 
NOT ON FILE. PLEASE ENTER A DIFF 
ERENT MONTH. ":FORI=lTO 3000: NEXT 
I : IFISW=1THEN5700ELSEGOTO5500 
5560 CLOSE #1:GOTO5000 
5570 CLOSE #1:GOTO5520 
5580 CTOT(ACNO)=CTOT(ACNO)+AMT:0 
PEN "D", #2,"CHRTACCT/DAT",30:GO 
SUB5400 

5590 N=RNO : CSW=2 : CLS : PRINT"CHANG 
ES FOR ";MO$(MO) ; " , " ; YEAR: PRINT@ 
32,STRING$(32,CHR$(12 8) ) :GOTO504 
5 



5600 CLOSE #1: CLOSE #2: CLS: PRINT 
@128,"DO YOU WISH TO MAKE MORE 

CHANGES FOR THIS MONTH";: I 
NPUTA$:IFA$="Y"THEN 5520 ELSE IF 
A$="N" THEN 5220 ELSE 5600 
5610 IFISW=1THEN5760ELSEPRINT§32 
0,"THE ABOVE RECORD NUMBER IS NO 
T ON FILE. PLEASE ENTER ANOTHER 
NUMBER. " ; : FORI=1TO3000 :NEXTI: 
IFDSW=1THEN5930ELSE5522 
5700 SW=0: CLS :PRINT@128, "WHICH M 
ONTH'S TRANSACTIONS NEED AN ADDI 
TION (99 FOR MAIN MENU) " ; : INPUTM 
O:IFMO=99THEN160ELSEIFMO<1ORMO>1 
2THEN5700ELSE5710 
5710 A=MO:ISW=1:GOTO5005 
5720 A=MO:ISW=l:OPEN "D",#1,FLE$ 
,51 

5730 CLS:PRINT@12 8, "WHAT IS THE 
RECORD NUMBER YOU WISH TO ADD 
(999 FOR RETURN TO MENU) ";: INPU 
TRNO:IFRNO=999THEN5560ELSEIFRNO< 
10R RNO>135THEN5730ELSE5740 
5740 GOT05525 

5750 PRINT§320, "RECORD NUMBER AL 
READY ON FILE. PLEASE ENTER ANO 
THER NUMBER . " ; : FORI=1TO3000 : NEXT 
I:GOTO5730 

5760 MO=A : N=RNO : OPEN "D",#2,"CHR 
TACCT/DAT" , 30 : GOSUB5400 : CLS : PRIN 



One- Liner Contest Winner . . . 

These two programs convert between E1A resistor 
color codes and resistance values. The first converts 
band colors to the value; the second takes a value and 
gives the three color bands. 
The listings: 

1 PRINT : DIMA ( 12 ) ,B(3) :A(1)=2:A(2 
)=3:A(3)=4:A(4)=7:A(5)=9:A(6)=1: 
A(8)=5:A(10)=6:A(12)=8:S$="ROYVW 
BNGNBEGY" : F0RI=1T03 : PRINT"ENTER 
COLOR BAND" ; I ; : INPUTA$ : B ( I ) =A ( IN 
STR(S$,A$) ) :NEXT:PRINT"RESISTANC 
E IS";INT(B(1)*10 A (B(3)+1)+B(2)* 
10 A B(3));" OHMS": RUN 



1 DIMA$(9) :A$(0)="BK":A$(1)="BN" 
:A$(2)="R":A$(3)="0":A$(4)="Y":A 
$(5)="GN":A$(6)="BE":A$(7)="V":A 
$ (8) = "GY" : A$ (9) ="W" : PRINT"RESIST 
ANCE "; :INPUTD:C=INT(LOG(D)/LOG( 
10) ) :IFC=0THENP=1ELSEP=C:IFO0TH 
ENC=C-1 

2 D=D/10 A P+.01:A=INT(D) :B=(D-A)* 
10 .-PRINT" COLOR CODE - ";A$(A);" 
";A$(B) ;" M ;A$(C) : PRINT: RUN 

Kurt Stefans 
Rosette, IL 

(I-'or these winning one-liner contest entries, the author has been sent copies 
of both The Seeond Rainbow Bonk Of Adventures and its companion The 
Second Rainbow At/ventures Tape.) 



One- Liner Contest Winner . . . 

The first program lets you type in the price of a car, 
the interest rate and number of payments to get the 
amount of each payment; the second takes the 
payment amount, interest rate and number of pay- 
ments and gives you the pay-off balance. 

The listings: 

1 CLS:PRINT§10,"CAR PAYMENT" : INP 
UT"BAL" ; A: INPUT "ANNUAL INTEREST 
RATE" ;B: INPUT "NUMBER OF PAYMENTS 
";C:D=A/((1-((1+((B/12)/100)) A (- 
C) ))/((B/12)/100) ) : PRINT "PAYMENT 
S WILL BE $"; :PRINTUSING" #####.# 
#";D: INPUT" ANOTHER (Y/N) ";A$:IFL 
EFT$(A$,1)="Y"THEN1ELSEEND 



2 CLS: INPUT "AMOUNT OF PAYMENT"; A 
: INPUT "ANNUAL INTEREST RATE";B:I 
NPUT" NUMBER OF PAYMENTS LEFT";C: 
E=A* ( (1- ( (1+ ( (B/12)/100) ) A (-C) ) ) 
/ ((B/12)/ 100) ): PRINT" PAYOFF BALA 
NCE $";:PRINTUSING"#######.##";E 
: INPUT"ANOTHER (Y/N) " ; A$ : IF LEFT 
$ (A$ , 1) ="Y"THEN2ELSEEND 

Charles Stauher 
Great Lakes, IL 

(For these winning one-liner contest entries, the author has been sent copies 
of both The Second Rainbow Book Of Adventures and its companion The 
Second Rainbow Adventures Tape.) 
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T"ADDITIONS FOR " ;MO$ (MO) ; " , " ; YE 
AR:PRINT@3 2,STRING$(32,CHR$(12 8) 
) :SW=2:GOTO5045 

5770 CLOSE #1: CLOSE #2:CLS:PRINT 
@128,"DO YOU WISH TO ADD MORE 

TRANSACTIONS TO THIS MONTH 
" ; : INPUTA$ : IFA$="Y"THEN5720ELSEI 
FA$="N"THEN5220ELSE5770 
5900 CLS: PRINT© 12 8, "WHICH MONTH' 
S TRANSACTIONS NEED AN ITEM DELE 
TED (99 FOR RETURN TO MENU)";:I 
NPUTA:IFA=99THEN160ELSEIFA<0 OR 
A>12THEN5900ELSE5910 
5910 DSW=1:MO=A:GOTO5005 
5920 DSW=l:MO=A:OPEN "D" , #1, FLE$ 
,51 

5930 CLS:PRINT§12 8, "WHAT IS THE 
RECORD NUMBER YOU WISH TO DELE 
TE (99 9 FOR RETURN TO MENU)";:I 
NPUTRNO : IFRNO=9 9 9THEN55 60ELSEIFR 
N0<1 OR RNO135THEN5930ELSE5940 
5940 GOT05525 

5950 CLS:PRINT"DELETIONS FOR ";M 
0$ (MO) ; " , " ; YEAR:PRINT§3 2 , STRING$ 
(32,CHR$(128) ) :GOT05526 
5960 PRINT@384,STRING$(32,CHR$(1 
28)) :PRINT@416,"IS THIS THE TRAN 
SACTION YOU WISHTO DELETE" ;: INPU 



TA$:IF A$="Y"THEN5980 ELSE IF A$ 
="N" THEN5930 ELSE5536 
5980 CTOT(ACNO)=CTOT(ACNO)+AMT:N 
=RNO : ACNO= 999: AMT=0 : GOTO 5145 
5990 CLS:PRINT@128,"DO YOU WISH 
TO DELETE MORE TRANSACTIONS 

FOR THIS MONTH"; :INPUTA$:IFA$=" 
Y"THEN5930ELSEIFA$="N"THEN5995EL 
SE5990 

5995 CLOSE#1:GOTO5220 
6000 BSW=1:GOTO3 60 
6010 BSW=0:GOTO3 2 70 
7000 DLSW=1 : CLS : PRINT@128 , "WHICH 

MONTH'S BUDGET DO YOU WISHTO DI 
SPLAY" ; : INPUTA: IFA<1ORA>12THEN70 
00 

7010 GOSUB11950:GOSUB11980 

7015 SUMBUD=0:FORI=1TO100 STEP4 

7017 PRINT@480,"======SEARCHING 

FOR DATA. ======" 

7020 CLS: IF SW8=1 THEN 7080 ELSE 
PRINT@0, "BUDGET FOR " ;M0$ (MO) ; Y 
EAR: PRINT STRING$ (32 , "-") 
7035 PRSW=0:FOR X=I TO 1+3: IF MI 
D$(DA$(X) ,1,5)="XXXXX" OR CTOT(X 
)=0 THEN 7036 ELSE PRINT DA$ (X) : 
PRINT USING"% %###%%$###,###.## 
-";"ACT ";X;" " ;CTOT (X) : PRINT: P 




Authorized Star Micronics Service Center * Call lor return authorization number. 

THE WAITING IS OVER! 

THE SUPER COSMOS CONNECTION 

SERIAL TO PARALLEL CONVERTER WITH BUFFER! 

YOU JUST CANT BUY A BETTER 
SERIAL/PARALLEL CONVERTER! 

ORDER YOURS TODAY 
- 8K SUPER COSMOS CONNECTION 

— ONLY $129.95 — 

8K RAM CHIP SOLD SEPARATELY - $15.95 each 
3 FOR $42.95 
16K VERSION -$144.95 
24K VERSION -$154.95 
32K VERSION - $169.95 



• SERIAL TO PARALLEL CONVERSION 

• 110 TO 19.200 BAUD, 7 OR 8 BIT 

• 8K BYTES STANDARD BUFFER 
(USER EXPANDABLE TO 32K IN 8K STEPS) 

• COPY/CLEAR, LED PUSH BUTTON (MULTIPLE COPIES) 

• MODEM SWITCH AND ALL CABLES 

• COMPLETE WITH POWER PAK AND SIMPLE INSTRUCTIONS 

• WORKS WITH ANY PARALLEL PRINTER OR YOUR MONEY BACK 

• HIGHEST QUALITY CONSTRUCTION, TWO-VEAR WARRANTY 

IF YOU'D RATHER BE USING YOUR COMPUTER THAN WAITING 
FOR YOUR PRINTER THE WAIT IS OVER. 



TEST RESULTS: (79,056 BYTE PROGRAM 
LISTING AT 9600 BAUD.) 



32K SUPER COS-CON 

36.8 Seconds 



OTHER INTERFACE 

4 min. 59.8 sec. 



8K SUPER COSMOS CONNECTION 

AND STAR SG-10 PRINTER 

$379.00 Package S&H Included! 



NO SURCHARGE FOR 
CREDIT CARDS 



SG-1 Package wilh Regu lar CosCon 
Still Available Now at $289.00 
Shipping Included! 



APPLE IIC VERSION AVAILABLE 

Dealer Inquiries on Company Letterhead invited. 
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RSW=1 : SUMBUD=SUMBUD+CTOT (X) 

7J23 6 NEXTX:IF PRSW <> 1 THEN 704 

5 ELSE PRINT@48p, "PRESS <ENTER> 

TO CONTINUE . " ; : 

7040 IK$=INKEY$:IF IK$ <> CHR$(1 

3) THEN 7j34j3 

7^45 NEXTI:CLS:IF SW8=1 THEN 705 

ELSE PRINT"BUDGET FOR ";MO$(MO 

) ;YEAR:GOTO7060 

7050 PRINT "ACTUAL FOR ";MO$(MO) 

; YEAR 

7060 PRINT STRING$(32,"-") :SW8=0 

: PRINT USING "% %$###,### 

. ##-" ; "TOTAL— > " ; SUMBUD: SUMBUD 

=0:PRINT@480, "PRESS <ENTER> TO C 

ONTINUE . " ; : 

7065 IK$=INKEY$:IF IK$ <> CHR$(1 

3) THEN 7065 ELSE 160 

7080 PRINT @0, "ACTUAL FOR ";MO$(M 

0) ; YEAR: PRINT STRING$ (32 , "-") :G0 

TO7035 

8000 DLSW=1:SW8=1:CLS:PRINT@128, 

"WHICH MONTH'S ACTUAL DATA DO YO 

UWISH TO DISPLAY"; : INPUTA: IFA<10 

RA>12THEN8000 

8010 GOSUB11960:GOSUB11950:GOSUB 

11985 : FORI=1TO100 : CTOT ( I ) =TT0T ( I 

) :NEXTI:GOTO7015 



8990 CLS: PRINT 11 ********* SELECTI 
ONS ********** : PRINT: PRINT" 1) DI 
SPLAY A MONTH" : PRINT: PRINT" 2) DI 
SPLAY YEAR-TO-DATE" : PRINT : PRINT" 
3) RETURN TO MAIN MENU" : PRINT : PR 
INT" ";:INPUTA:ON A GOTO 8995,90 
00,160,8990 

8995 CLS:PRINT@12 8,"WHICH MONTH" 
S ACTUAL VS. BUDGET DO YOU WISH 
TO DISPLAY" ; : INPUTA: I FA<0ORA>12T 
HEN8995ELSE9010 

9000 YRSW=1 : DLSW=1 : CLS : PRINT© 12 8 
, "ENTER MONTH FOR WHICH YOU WISH 
TO DISPLAY YEAR TO DATE THROUG 
H ";: INPUTA :IFA<1ORA>12THEN9000 
9010 GOSUB11960:GOSUB11950:GOSUB 
11985:GOSUB11980 

9020 A=0:B=0:FORI=1TO100 STEP 4 
902 3 PRINT§480,"======SEARCHING 

FOR DATA . ======" ; : 

9024 IF YRSW=1 THEN 9025 ELSE 90 
27 

9025 IF YRSW <> 1 THEN 9027 ELSE 
CLS : PRINT@0 , "ACTUAL VS . BUDGET" 

: PRINT"THRU " ;M0$ (MO) ; YEAR .'PRINT 

STRING$(31,"-'») :GOTO9030 
9027 CLS : PRINT@0 , "ACTUAL VS . BUD 
GET":PRINT M0$ (MO) ; YEAR: PRINT ST 



BEST 



WE'VE CHOSEN THE BEST OF OVER 400 PROGRAMS AND 
PACKAGED THEM FOR YOU! 10 TO 12 PROGRAMS EACH 
PACKAGE. COLOR COMPUTER ONLY 



#1 Home Management 
Budget 

Checkbook Balancer 
Cosl of Uwng 
Tinycalc 

EieclwcDaiebooX 
Account Manager 
Stock Marker 
Word Processor 
Lottery Anaiysl 
Coco Database 
Coco Terminal 
Bartends' 

#4 Adventu res 

Treasures of Barsoom 

Kilter Mansion 

Co!ege Adventure 

Coco-Terrestnai 

Escape 

Zectw 

Skid Row 

Quest 

NaugtbCe 
Haunted House 



#2 Utility 1 



Cassette Merge 
Coco Monitor 
Tape Analysis 
ML lo Data 
High Texl Mod. 
HghTeid 
Program Packer 
Easy Bast 
Key Repeal 
Fu« Screen Editor 
Romcopy 
Basicram 

#5 Games 



Trek 

Galactic Conquest 

Warlords 

The Power Sword 

Steps 

Robot Bomber 

Force Field 

Rat Attack 

Caterpillar Cave 

Meteor 



Some of these programs above 
can sell lor $29.95 each 



RAINBOW 



#3 Machine Language Tutorial 

Basic Corrpiier 

ML Tutorial LB 

(9 Programs) 

MLT Dictionary 

Coco TochKot Look Pt 1-3 



#6 Utilities II 

Disk Dir Prat 
Dir PackS Son 
DiskZapper 
RollOul 
Doss Boss 
Disk Backup 
51-24 Edit* 
51"24 Screen 
Aulocopy 
Fastson 
10 Error Icnorer 
Text Screen Print 




CtMlflCATIOft 

1**1 



$' 



29 



95 



each 



TAPE OR DISK 

** SPECIAL *• 
BUY 2 OR MORE SAVE 10% 
BUY 4 OR MORE SAVE 20% 



THE GREATEST SOFTWARE 
DEAL ON EARTH! 



GET 12 DISKS OR TAPES A YEAR CONTAINING OVER 120 QUALITY PRO- 
GRAMS. A SUBSCRIPTION TO T & D SOFTWARE CONSISTS OF 10 READY- 
TO-LOAD PROGRAMS DELIVERED BY FIRST CLASS MAIL EVERY MONTH. 

NO, WE ARE NOT THE SAME AS THE RAINBOW ON TAPE. IN FACT, MANY 
SUBSCRIBERS HAVE WRITTEN IN AND SAID THAT WE ARE MUCH BETTER 
THAN RAINBOW ON TAPE! 




■ PRICES - 



TAPE OR DISK 

1 YEAR (12 issues) 70.00 
6 MO. (6 issues) 40.00 
1 ISSUE 9.00 

Michigan Residents Add 4% 

Overseas Add SI0 to Subscription Price 

Personal Checks Welcome' 



* Color Computer Only 

* 16K Extended Required 

* Over 3000 Satisfied Customers 

* Back Issues Available From 

* July '82 (Over 400 Programs) 

* THIS MONTH ONLY • 



SUBSCRIBE FOR A YEAR 
AND RECEIVE A 
FREE PACKAGE 
OF YOUR CHOICE 



OUR LATEST ISSUE CONTAINED 
1 HOME PRODUCT EVALUATION 
2. YAHTZEE 
3 DISK FILE UTILITY 
i. MACH II 

5. ELECTRONIC BLLBOARO 

6. THE GREAT CHASE 

7. SUPER MANSION ADVENTURE 

8. SLOT MACHINE GIVE AWAY 

9. TEXT BUFFER r 
10. TUNNEL RUN 



RAINBOW 

CtHT#KATKM 
UAL 



MasterCard 



T & D SUBSCRIPTION SOFTWARE, P.O. BOX 256C, HOLLAND, Ml 49423 (61 6) 3967577 
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RING$(31,"-") 

9030 PRSW=0:FOR X=I TO 1+3: IF MI 
D$(DA$(X) ,1,5)="XXXXX" OR CTOT(X 
)=0 AND TTOT(X)=0 THEN 9033 ELSE 

PRINT DA$(X):PRINT USING"% %### 
,###.##-% %###,###. ##-";"A) "; 
TTOT(X);" B) ";CTOT(X) 

9031 A=A+TTOT(X) :B=B+CTOT(X) : PRS 
W=l : CTR1=CTR1+A : CTR2=CTR2+B 
9j333 NEXTXrIF PRSW <> 1 THEN 904 
5 ELSE PRINT 0480, "PRESS <ENTER> 
TO CONTINUE . " ; : 

9040 IK$=INKEY$:IF IK$ <> CHR$(1 

3) THEN 9040 

9045 NEXTI:IF YRSW <> 1 THEN 904 

7 ELSE CLS : PRINT" ACTUAL VS. BUDG 

ET": PRINT "THRU ";MO$(MO) ; YEAR: PR 

INT STRING$(31,"-") : PRINT:GOTO90 

50 

9047 CLS : PRINT"ACTUAL VS. BUDGET 

" : PRINT MO$ (MO) ; YEAR: PRINT STRIN 

G$(31,"-") :PRINT 

9050 YRSW=0 : PRINT" TO 

TALS": PRINT: PRINT USING"% %###,# 

##.##-% %###,###. ##-";"A) ";A; 

" B) ";B:A=0:B=0:PRINT@480,"PRE 

SS <ENTER> TO CONTINUE";: 

9055 IK$=INKEY$:IF IK$ <> CHR$(1 

3) THEN 9055 ELSE 160 

10000 CLS:PRINT"***********SELEC 

TIONS***********":PRINT"l) DISPL 

AY ALL ACCOUNT DESCR 

IPTIONS": PRINT: PRINT" 2) DISPLAY 

SINGLE ACCOUNT DESCRIPT 

ION": 

10002 PRINT: PRINT" 3) RETURN TO M 

AIN MENU": PRINT: PRINT" " ; : INPUTA 

:ON A GOSUB 10010 , 10500, 160 : GOTO 

10000 

10010 RC=1:GOTO4010 

10500 CLS: OPEN "D" , #1, "CHRTACCT/ 

DAT" , 30 

10510 CLS:PRINT@128,"ENTER ACCOU 

NT NUMBER YOU WISH TO DISPLAY" 

;:INPUTAC:IF AC<0 OR AO100 THEN 

10510 
10520 RC=1:GOTO4520 
10530 RC=0: CLOSE #1 
10540 PRINT@416, "ENTER <R> TO RE 
TURN TO MAIN MENU. " ; : INPUTA$ 
10550 IF A$="R" GOTO 160 
10560 GOTO 10540 

11000 CLS:PRINT@128,"I AM LOADIN 
G THE PROGRAM FOR THEREPORT GENE 
RATOR. " :RUN"REPTGENR" 
11700 CLS:PRINT@9 6,"THE 1ST PRIN 
T LINE SHOULD BE ABOUT 3/4 IN 
CHES FROM THE TOP OF PAPER. PL 
EASE ALIGN. WHEN PAPER IS ALI 



GNED PROPERLY TYPE <YES> IN RES 

PONSE TO QUESTION. ": PRINT: PRINT" 

IS PRINTER READY"; :INPUTA$:IFA$= 

"YES"THENRETURNELSE11700 

11800 I=1:LC=0:CLS:PRINT@98, "PRI 

NTING CHART OF ACCOUNTS .": OPEN " 

D" , #1, "CHRTACCT/ DAT" , 30 

11810 PRINT#-2," ACT < 

— D ESCRIPTIO N — >":PRIN 

T#-2 : 

11820 GET#1,I:INPUT #1,DESC$:D$= 

MID$(DESC$,1,5) :IFD$="XXXXX"THEN 

11825ELSEPRINT#-2, USING"% 

%";" ";I;" ";DES 
C$ : LC=LC+1 : 1=1+1 : IFLC=50THENGOSU 
B11880ELSEIFI=101THEN11890ELSE11 
820 

11825 1=1+1 :IFI=101THEN11890ELSE 
11820 

11830 GOTO11810 

11880 F0RX=1T014:PRINT#-2:NEXTX: 
LC=0 : RETURN 

11890 FOR X=LC TO 63 : PRINT#-2 : NE 
XTX : LC=0 : CLOSE# 1 : GOTO160 
11900 GET #1,1: INPUT #l,ACNO,MO, 
DA, YR, CHK, AMT , PRP$ , PST : RETURN 
11910 PRINT#-2:LC=LC+1:IFLC=59TH 
EN160ELSE11910 

11950 CLS:PRINT@9 6,"ONE MOMENT P 
LEASE, I AM LOADING ACCOUNT DESC 
RIPTIONS . " : OPEN "D" , #1, "CHRTACCT 
/DAT" , 30 : FORI=1TO100 : GET # 1 , I : IN 
PUT #1,DESC$:DA$(I)=DESC$:NEXTI: 
CLOSE #1: RETURN 

11960 CLS:PRINT§128,"I AM CHECKI 
NG TO SEE IF THE DATAFOR THE MON 
TH YOU SELECTED IS ONFILE . " :MO=A 
:OPEN " D",#l," FILENAME/DAT", 21 :F 
ORI=1T012:GET #1,1 '.INPUT #1,YEAR 
, FLE$ : FL$ ( I ) =FLE$ : NEXTI : CLOSE* 1 
11965 IF FL$(MO) = "ZZZZZZZZ/ZZZ 
" THEN 11970 ELSE RETURN 
11970 PRINT: PRINT" DATA FOR THE M 
ONTH YOU ENTERED IS NOT ON FILE 
. I AM RETURNING TO MENU.": FORT 
=1TO3000:NEXT T:IF DLSW=1 THEN 1 
2030 ELSE 11000 

11980 MO=A:CLS:PRINT§98,"I AM LO 
ADING BUDGET DATA.": OPEN "D",#l, 
"BUDGET/DAT" , 128 : FORI=1TO100 : GET 

#1,1: INPUT #1,YEAR:F0RX=1T012:I 
NPUT #1,BAMT(X) :NEXTX:IF YRSW=1 
THEN11982ELSECTOT (I) =BAMT (MO) 

11981 NEXTI :CLOSE#l: RETURN 

11982 FOR 11=1 TO MO: CTOT (I) =CTO 
T(I)+BAMT(II) :NEXT II:GOT011981 
11985 CLS: PRINT@ 9 6, "I AM LOADING 

ACTUAL DATA.": OPEN "D",#1,"TRAN 
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PAPER ROUTE 



KARATE 




;core 



RENO 

/// 

80NUS last 



As a paper boy, you ride your bike along your 
route delivering papers to your customers. 
Break customers' windows or damage their 
property and they will cancel their 
subscriptions! Earn bonus points by damaging 
non-subscribers' property. Avoid pedestrians, 
cars, and maybe even a mad dog in your 
attempt to deliver all your papers! Detailed 
graphics and lots of surprises make this game a 
real challenge for everyone. 



64 k and joystick required 
tape or disk 



$28.95 us. 

$38.95 Can 




Challenge the computer, or a friend to a Karate 
match! In this game, you will use various Karate 
punches and kicks to knock your opponent down 
and earn points to win the match. When challeng- 
ing the computer, your opponent's Karate skills 
increase as you win matches. This game is a 
challenge for even the expert game player. 



64 k and joystick required $28 95 u s 

taPe ° rdiSk SSSJSoa 



MARBLE MAZE 




Move your marble around the mazes 
in your search for the finish line! 
Avoid the marble eaters, acid puddles 
and other creatures that inhabit the 
mazes. Avoid falling into holes or off 
the edges of the maze. Eight different 
levels and great graphics make this 
game a must for your collection. 
Congratulations to the contest 
winners! 

64 k and joystick required 
tape or disk $28.95 U.S. 
$38.95 Can. 



KNOCK OUT 





Fight against five different boxers in this great boxing game! At first the boxers are easy 
to knock out, but beware, it gets harder as you move on. The boxers are out to stop you 
in your quest to become champion of the world. But once you become champion your 
task is not over. You will then have to defend your title against those trying to regain the 
championship from you. Outstanding graphics make this a must for your collection! 

64 k required 
tape or disk $28.95 U.S. $38.95 Can. 



6715 FIFTH LINE, MILTON, ONT., CANADA L9T 2X8 



We accept: 




24 hr. order line: 

(416) 878-8358 

personal service 9-5 



cheque or money order 



Please add $2 for shipping 
& handling. Ontario 
residents add 7% sales tax. 
Dealer inquiries invited 
Looking for new software 



PRICKLY- PEAR SOFTWARE 

QUALITY PROGRAMS FOR YOUR COCO & TDP-100 

PROGRAMS REQUIRE 16K EXTENDED BASIC FOR TAPE, AND 32K DISK UNLESS OTHERWISE NOTED. 




HALL OF THE KING 

This program combines all the things you look for in a great 
two disk graphics adventure program. The Hi-Res graphics 
are superbly done. The text portion of the screen and the 
graphics change quickly as you move through the HALL 
OF THE KING. You can move freely from one portion of 
the adventure to another. Call up your inventory at any 
time. You can even save or load a game at ANY time. HALL 
OF THE KING will challenge even the most seasoned 
adventurer. 

In an age long past, a dwarven race lived in their mountain 
home. They were forced to flee under threat of destruction 
leaving behind their most powerful possession, the Earth- 
stone. As a prominent adventurer, you will be asked to 
undertake a perilous quest, the recovery of the Earthslone! 
This is your FIRST adventure in the search for what is 
deemed to have been the cornerstone of the legendary 
power of the dwarves. 

HALL OF THE KING requires 64K EB and one disk drive. 
This exciting two disk adventure comes packaged in a 
vinyl library case. $39.95 

WARP FACTOR X 

If you have been waiting for a game for your color computer 
that has everything, your wait is over. WARP FACTOR X is 
here. This all graphics simulation game requires strategy, 
fast thinking, an eye for detail, and above all experience in 
knowing the capabilities of your starship and its computer. 
You will begin your adventure into space as a cadet but 
your ultimate goal is to become Captain of the Enterprise. 
To do this you must neutralize the enemy planets and 
eliminate the Klingon starbases along with the Klingons 
themselves.The Klingon isnota"Robot." He hasthesame 
capabilities as your starship but he is also subject to the 
same problems. You will find that he is inclined to move 
around while you are attacking him and may even chase 
you when you find it prudent to retreat. You must form 
alliances with neutral planets and bring them into the 
federation. Many of the planets will have special resources 
which will help the federation. 

WARP FACTOR X was written by an engineer for the 
Kennedy Space Center and has been three years in the 
making. You will appreciate the attention to detail and 
complex inner workings of the program. The program is 
supported by eight pages of documentation important to 
the success of your mission. Your progress through the 
eighteen sectors of the galaxy will be recorded and saved 




for your next adventure into space. WARP FACTOR X 
includes versions for32K, 64K, and COCO 2. It requires 
one disk drive and comes packaged in a vinyl library case. 
$34.95 

DARKMOOR HOLD 

You and your comrades will explore the levels of Darkmoor 
Hold in an effort to gain great riches and defeat the dark 
wizard. The Wizard will soon realize the threat you pose 
and the many monsters you meet and battle will become 
stronger and more powerful as you move through the 1 
levels of Darkmoor. A keen eye will help you find weapons 
and armor to aid your battle along with treasures for you to 
keep. Your party consists of a Dwarf, an Elf, and you, the 
Human, each with their own special attributes. The 
weapons, armor and treasure are placed randomly in each 
level to provide a new challenge each time you play. You 
may also save the game you are playing since defeating 
the evil Wizard is not an easy task. It has great graphics 
and an impressive text screen to give you more fun than a 
barrel of elves. Requires 64KEB and 1 disk drive. $29.95 

FAMILY- TREE 

FAMILY-TREE is a sophiticated program that can help 
organize your families' history. Whether you are new to 
genealogy or an experienced genealogist you will find 
FAMILY-TREE of great assistance. It is specifically designed 
to organize family relationships and supply information on 
each person, Information can be listed on the screen or 
printer even a pedigree chart listing up to 4 generations. 
Records can be altered or deleted and additions made 
quickly and easily. Each file can contain over 160 names 
and. of course, you can have files for every branch of the 
family. Smaller files can be combined. There is even a help 
file on the disk version. Requires 64K. TAPE — $24.95; 
DISK — $29.95 

SUPER ASTROLOGY 

Everything our customers have written and asked for in an 
astrology program is here! This all new program by a new 
author gives accuracy to two minutes ol arc or better, and 
you can choose from Tropical or Sideral zodiacs, Geo- 
centric or Heliocentric charts, and FIVE different house 
systems — Placidus, Koch, Campanus, Equal, and Regio- 
montanus. You can specify the orb for aspects, find any 
harmonic, and output thecomplete natal horoscope listing 
to the screen or printer. This program comes with complete 
and easy to follow instructions and a suggested reading 
list to aid in interpretation. The planetary routines and 
values in this program are Copyright by Matrix Software — 
the industry leaderin astrological programming — and are 
used by permission. Don't settle for a lesser quality astrol- 
ogy program. Needs 32K Extended. B & ML. Tape — 
$24.95; Disk — $29.95 



POLICY ON PROTECTION — We 
believe our customers are honest 
— all of our software can be 
backed up using standard back- 
up procedures. 



Your personal check is welcome 
— no delay. Include $1.50 ship- 
ping for each order. AZ residents 
add 5% sales tax. Orders shipped 
within two days. 



Dealer and author inquiries are 
always welcome. Canadian deal- 
ers should contact Kelly Software 
Distributors, Ltd., P.O. Box 1 1 932, 
Edmonton, Alberta T5J-3L1 (403) 
421-8003. 



FOR QUESTIONS OR ORDER STATUSCALL 602-749-2864 

SEND FOR OUR FREE CATALOG OF 

GREAT COCO PROGRAMS 



Stocked by Quality Dealers, or 

Send Order To PRICKLY-PEAR SOFTWARE 

2640 N. Conestoga Ave. 
Tucson, Arizona 85749 
(602) 749-2864 



SFLE/DAT" , 128 : FORI=1TO100 : GET#1 , 
I : INPUT#1 , YEAR: F0RX=1T012 : INPUT* 
1,TAMT(X) :YT0T(I)=YTOT(I)+TAMT(X 
):NEXTX:IF YRSW=1 THEN11987ELSE 
TTOT(I)=TAMT(MO) 

11986 NEXTI:CLOSE#l: RETURN 

11987 FOR 11=1 TO MO: TTOT(I)=TT 
OT(I)+TAMT(II) :NEXT II:GOT011986 

12000 DLSW=1: CLS : PRINT"********* 
SELECTIONS **********" : PRINT: PR 

INT"1) DELETE A MONTH'S TRANSACT 
IONS": PRINT" 2) DELETE A MONTH'S 
BUDGET" : PRINT: PRINT" 3) RETURN TO 
MAIN MENU" : PRINT : PRINT" " ; : INPU 
TA: IFA<1ORA>3THEN12000 

12001 ON A GOTO 12005,12200,160 
12,0)35 CLS:PRINT@128,"WHICH MONTH 
'S TRANSACTIONS DO YOU WISH TO 

DELETE " ; : INPUTA: IFA<10RA>12THE 
N12005ELSEGOSUB12007 

12006 GOSUB11960:GOTO12010 

12007 PRINT: PRINT "ARE YOU SURE ( 
ENTER <N> FOR RETURN TO MAIN 

MENU OTHERWISE ENTER <Y> TO D 
ELETE) ?";: 

12008 IK$=INKEY$:IF IK$="N" THEN 
160 ELSE IF IK$="Y" THEN RETURN 
ELSE 12008 

12010 DLSW=0:CLS:PRINT@128,"I AM 
DELETING DATA IN FILE": PRINT FL 
$(MO) :KILL FL$(MO) : FL$ (MO) ="ZZZZ 
ZZZZ/ZZZ":OPEN "D" , #1, "FILENAME/ 
DAT", 21 :F0RI=1T012: WRITE #1,YEAR 
,FL$(I) :PUT#l,I:NEXTI:CLOSE#l 
12012 FLNM$="TRANSFLE/DAT" 
12^15 OPEN "D",#1,FLNM$, 128: FORI 
=1TO1#0:GET# 1,1: INPUT #l,YEAR:FO 
R N=l TO 12:INPUT #1,TAMT(N) :NEX 
TN 

12020 TAMT (MO) =0: WRITE #1,YEAR:F 
OR N=l TO 12:WRITE#1,TAMT(N) :NEX 
TN:PUT #l,I:NEXTI:CLOSE #l:GOT01 
60 

12030 DLSW=0: GOTO 160 
12200 CLS :PRINT@128, "WHICH MONTH 
'S BUDGET DO YOU WISHTO DELETE " 
;: INPUTA: IFA<1ORA>12THEN12200ELS 
EGOSUB12007 

12210 CLS:PRINT§128,"I AM DELETI 
NG BUDGET DATA. ": FLNM$=" BUDGET/ D 
AT":MO=A:GOTO12015 

13000 CLS: PRINT© 12 8, "ARE YOU REA 
DY TO BACKUP YOUR FILES (Y/N) 
" ; : INPUTA$ : IFA$="N"THEN160ELSEIF 
A$="Y"THEN13005ELSE13000 
13005 CLS:PRINT@128,"REMOVE DISK 
ETTE AND WRITE PROTECT. I 
NSERT WRITE PROTECTEDDISKETTE AN 
D PRESS <R>." 



13006 IK$=INKEY$:IF IK$="R"THEN1 

3010ELSE13006 

13010 CLS :PRINT@ 12 8, "BACKING UP 

FILES . " : BACKUP0 : END 

18000 CLS0:PRINT@192,"SO LONG TI 

LL NEXT TIME. MAY ALL YOUR EXPEN 

SES BE SMALL."; 

18010 END 



// 




11400 . 


...81 


40 


.190 


11500 . 


..181 


11115 .. 


..105 


11600 . 


..172 


11145 . 


...52 


11800 .. 


..177 


11239 .. 


..102 


11960 .. 


.193 


11350 .. 


..207 


END 


135 











Listing 3: REPTGENR 

PCLEAR1 

5 CLS0 

6 PRINT" EXPENSE TRACKING & MANA 
GEMENT" 

12 PRINT@64,STRING$(32,"$") ; : PRI 
NT" author 

"; : PRINT" EDDIE HIL 

L": PRINT" 124 STERLING DRI 
VE": PRINT" HUEYTOWN, AL 35 
023":PRINT" (205)491-145 

2": PRINT STRING$(3 2,"$") ; : 
15 PRINT" requirements 

"; : PRINT" 64K COCO D 
ISK BASIC 1.1": PRINT" 
DISK DRIVE": PRINT" DMP 10 

PRINTER" : PRINT STRING$ (32 , "$") 

19 PRINT@481,"PART 11=========== 

=AUGUST 1985";: 

20 P=64:F0RI=1T012:PRINT@P,"$"; : 
PRINT@P+3 1 , " $ " ; : P=P+3 2 : NEXTI : FOR 
X=1T09999:NEXTX 

21 DATA "JANUARY", "FEBRUARY", "MA 
RCH" , "APRIL" , "MAY" , "JUNE" , "JULY" 
, "AUGUST" , "SEPTEMBER" , "OCTOBER" , 
"NOVEMBER" , "DECEMBER" 

29 CLEAR3000 

30 FILES 3: DIM BAMT (12) ,TAMT (12) 
, VAR ( 12 ) , MO$ ( 12 ) , FL$ ( 12 j I , TTOT ( 10 
0) ,DA$(100) ,CTOT(100) ,YTOT(100) 
40 FORI=lT012:READMO$(I) :NEXTI:R 
ESTORE 

50 GOTO11000 

160 CLS:PRINT§13 3,"ONE MOMENT PL 

EASE . " : DLSW=0 : FOR I=1TO100 : DA$ ( I 

) =" » : CTOT ( I ) =0 : TTOT ( I ) =0 : YTOT ( I ) 

=0 : NEXTI 

1 1000 TRS W=0 : TT=0 : CLS : PRINT " * * * * 

*******SELECTIONS**********":PRI 

NT:PRINT"1) LIST MONTHLY TRANSAC 
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MORETON BAY SOFTWARE 



MORE GOOD SOFTWARE 

GRAPHICOM 

3 disk package $29.95 

64K EXB disk 
SAM DIAMOND 

graphic adventure .... $29.95 

32K EXB disk 
HOT SLOT 

casino simulation .... $24.95 

32K EXB disk or tape 
ECLIPSE 

excellent pixel editor. . $19.95 

64K EXB disk 




THE MOTION PICTURE 

A complete animation development system for your CoCo 
An object oriented graphic screen developer. Using this 
tool you can quickly and simply animate your pictures. 
Take standard graphic screens that you develop and 
incorporate them into MOTION PICTURES. Animate up 
to eight frames, yielding smooth animation. Generate 
screens from objects and build screens from stored objecl 
files. Included are routines to display animation from 
BASIC. We believe you'll like this program, so we make 
this offer: We will send you a demonstration disk for S4.0C 
which you can apply as a credit if you buy the program. 
Requires 64K. Disk. $39.95. 



MORE KEYS 

At last a quality numeric keypad for 
your Color Computer. This 15 key 
numeric pad plugs inside your com- 
puter and gives you the convenience 
of rapid numeric data entry. Dimen- 
sions: length 6V2" (165mm). width 4" 
(101 mm), height 3" (76 mm). Baked 
black enamel finish. Specify computer 
model. MORE KEYS complete with 
cable and connector. 
$69.95 




DOUBLE DRIVER I 

The BEST monitor driver available. 
Color composite, monochrome and 
audio output. For original CoCo D. E 
and F boards. $24.95. 

MONO II 

Mono II for Color Computer 2. An 
excellent monochrome monitor driver 
that has audio output also. Specify 
model needed. 

$24.95. 




RESET-POWER-SWITCHES 

A REAL IMPROVEMENT 

Move the power switch and reset 
switch where they belong. An LED 
power on light too! High quality parts. 
D and E boards totally solderless. The 
F board and some models of the 
CoCo II require soldering. 

Reset 1 Coco 1 $24.95 
Reset 2 CoCo 2 $27.95 



Either kit add $2.00 
shipping and handling. 



• I 





Guaranteed Pretested 



64K UPGRADES 

E Board (solderless - 

pictured) $39.95 

F Board $26.95 

CoCo 2 ( except 26-3134A&B and 

26-3136A&B) $26.95 

CoCo 2 (models 26-3134A&B and 
26-3136A&B $39.95 

Having trouble with your CoCo? We 
have the chips you need. Call us. 
(805) 962-3127 



DOUBLE DRIVER II 

Finally a monitor driver for 
the Color Computer II that 
lets you use a monochrome 
and a color monitor 
simultaneously. We're proud 
of this new driver. The six 
transister circuit provides op- 
timal signal mixing and signal 
gain. Excellent monochrome 
output and better quality 
resolution in the color ouput 




than any driver we have 
seen . Audio output also. Fits 
all models of the Color Com- 
puter II. $29.95. 




PLANETARIUM 




A five program celestial 
package. A star gazer's aid. A 
program to familiarize you 
with the appearance of the 
major constellations. 21 first 
magnitude stars. Moon 
phases. Day or night sky. 
Any latitude. 33 constella- 
tions. Charts planet locations 
from A.D. to the year 
10.000. Requires 16K 
Extended Basic. $19.95 



THE COCO-SWITCHER 

A QUALITY PIECE OF HARDWARE 

The CoCo Switcher allows you to hook u 
three peripherals to your RS-232 jack. Cor 
nect your modem, printer and any othe 
RS-232 compatible peripheral to the CoC 
Switcher. An LED on the CoCo Switch* 
shows if your computer is on or off at a glance 
The LED flickers when transmitting or recek 
ing data. 
$39.95 plus $2.00 shipping and handling 



MORETON BAY SOFTWARE 

A Division of Moreton Bay laboratory 

316 CASTILLO STREET 

SANTA BARBARA 

CALIFORNIA 93101 

(805) 962-3127 

Ordering information 
Send $2.00 shipping and handling per order. We ship 
within 1 working day on receipt of order. Blue Label 
Service available. California residents add 6% sales tax. 




TIONS" : PRINT" 2) LIST MONTHLY BUD 

GET": PRINT" 3) LIST BUDGET FOR YE 

AR": PRINT" 4) LIST ACTUAL FOR YEA 

R": 

11001 PRINT"5) LIST TRANS. SUM. 

FOR YEAR": PRINT" 6) LIST MO. ACTU 

AL VS. BUDGET": 

11005 PRINT"7) LIST YTD ACTUAL V 

S. BUDGET": PRINT" 8) LIST CHART O 

F ACCOUNTS": PRINT" 9) RETURN TO M 

AIN PROGRAM": PRINT" 10) END SESSI 

ON": PRINT: PRINT" ";:INPUTA:ON A 

GOSUB 11110,11200,11300,13000,11 

400 , 11500 , 11600 , 11699 , 12000 , 1800 

0:GOTO11000 

11110 CLS:PRINT@12 8, "WHICH MONTH 

DO YOU WISH TO LIST" ; : INPUTMO: I 
F MO <0 OR MO >12 THEN11110 ELSE 

AP$=LEFT$(MO$(MO) ,3) :A=MO 
11115 GOSUB11960 

11125 GOSUB11950 

11126 GOSUB11700 : CLS : PRINT@128 , " 
I AM PRINTING THE DETAIL 
TRANSACTIONS FOR " ;MO$ (MO) ; " . " ; : 
FLE$="DTLTRANS/"+AP$:OPEN "D",#l 
,FLE$,51 

11128 PRINT #-2, TAB (19) "MONTHLY 
TRANSACTIONS FOR " ;MO$ (MO) ; YEAR 

; : PRINT#-2 : PRINT#-2 : PRINT #-2 , TA 
B(0) "REC ACT";: PRINT #-2, TAB (4 
0) "TRAN": PRINT #-2,TAB(0) "NUM 

NUM ACCOUNT DESCRIPTION.. 

. . . I . D . DA . . AMOUNT . . TRANS . 

DESCRIPTION" ; : PRINT#-2 : 

11129 LC=0:IFPSW<>1THEN11130ELSE 
11150 

11130 FOR 1=1 TO 135:GOSUB11900: 
IFACNO=999THEN11140 

11131 PRINT#-2:PRINT#-2, USING"# 

%";I;SPACE$;ACNO;S 
PACE $ ; DA$ ( ACNO ) ; S PACE $ ; CHK ; " " ; DA 
;»";AMT;"" ;PRP$; : 

11135 TT=TT+AMT:LC=LC+1:IFLC=50T 
HENGOSUB11145 
11140 NEXTI:PRINT#-2:PRINT#-2:PR 

INT#-2,TAB(30) "TOTAL > 

";:PRINT#-2, USING"$### , ### . ##- 
" ; TT ; : PRINT#-2 : TT=0 : CLOSE # 1 : CLO 
SE #2:PSW=0:GOTO11910 
11145 PSW=l:FORX=lT012:PRINT#-2: 
NEXTX:GOT011128 

11150 1=1+1 :GOSUB11900:IFACNO=99 
9THEN11140ELSE11131 
11200 CLS:PRINT@9 6,"WHICH MONTH' 
S BUDGET DO YOU WANTTO LIST" ; : IN 
PUTA: IFA<0ORA>12THEN11200ELSE112 
05 



11205 MO=A:GOSUB11950:GOSUB11980 
-.GOSUB11700 

11210 I=1:LC=0:CLS:PRINT@9 6,"I A 
M PRINTING BUDGET DATA FOR " ;M 
0$(MO) ;YEAR;". " 

11215 PRINT#-2," ";"BUD 

GET FOR ";MO$(MO) ; YEAR: PRINT#-2 : 
11220 PRINT#-2," ";"ACT 

< — D ESCRIPTIO N — > . 
•AMOUNT. .":PRINT#-2: 
11230 IF DA$(I)=STRING$(27,"X") 
OR CTOT(I)=0 THEN11240ELSEBUDSUM 
=BUDSUM+CTOT(I) : PRINT#-2 ,USING"% 

";I;" ";DA$(I);" ";CTOT(I): 
LC=LC+1 : 1=1+1 : IFLC=50THENGOSUB11 
880ELSEIFI=101THEN112 3 5ELSE1123 
11235 PRINT#-2:PRINT#-2,USING"% 

%% %%%###, ###.##-";SPACE$;»T 
OTAL" ; " " ; BUDSUM 

11239 GOTO11890 

11240 1=1+1 :IFI=101THEN11235ELSE 
11230 

11300 RN$="BUDGET":GOSUB11950:FO 
RX=1T012 : TAMT (X) =0 : NEXTX : GOSUB 11 
700 : OPEN "D" , #1, "BUDGET/DAT" , 128 
:I=1:LC=0:ACNO=I 

11310 IF TRSW=1 THEN 11311 ELSE 
CLS:PRINT@9 6,"I AM PRINTING THE 
BUDGET FOR THEYEAR. " : GOSUB113 20 : 
GOT011335 

11311 CLS:PRINT§96,"I AM PRINTIN 
G THE ACTUAL FOR THEYEAR. ": GOSUB 
11320:GOTO11335 

11320 GET #1,I:IFDA$(I)=STRING$( 
27 , "X" ) THEN113 70ELSEINPUT#1 , YEAR 
:F0RX=1T012:INPUT#1,BAMT(X) :NEXT 
X : RETURN 

11335 PRINT#-2,STRING$(80,"-") : 
11340 PRINT# -2, TAB (3 6) "JAN 

FEB MAR APR" 

:PRINT#-2,TAB(36) "MAY J 

UN JUL AUG":PRIN 

T#-2,RN$;" FOR " ; YEAR;STRING$ (19 
," ") ;"SEP OCT N 

OV DEC":PRINT#-2,STRING$ 

(80,"-") ; :PRINT#-2 
11350 PRINT#-2,USING"% 

- M ;DA$(I) ;" " ;BAMT (1) ; " ";BAMT 
(2);" ";BAMT(3);" ";BAMT(4): 
113 53 SUMBUD=0:FORX=1TO12:SUMBUD 
=SUMBUD+BAMT(X) : TAMT (X) =TAMT (X) + 
BAMT(X) : NEXTX 
11355 PRINT#-2,USING"% 
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-»;SPACE$;BAMT(5) ;" ";BAMT(6) ; » 

" ; BAMT ( 7 ) ; " " ; BAMT ( 8 ) : 
11360 PRINT#-2,USING"###% 
%$###,###.##-% %##,###•##-%%# 
#,###.##-%%##,###.##-%%##,###•## 
- " ; ACNO ; " TOTAL . . . " ; SUMBUD ; S PAC 
E$ ; BAMT ( 9 ) ; " " ; BAMT ( 10 ) ; " " ; BA 
MT(ll) ;" "; BAMT (12) 
11365 IFTSW=1THEN11390ELSEPRINT# 
-2 : LC=LC+4 : 1=1+1 : ACNO=I : IFI=101T 
HEN113 80ELSEIFLC=52THEN11398ELSE 
GOSUB11320:GOTO11350 
11370 1=1+1 :ACNO=I:IFI=101THEN11 
380ELSE11320 

11380 1=1: ACNO=999 : DA$ (I) ="TOTAL 
"+RN$+" FOR YEAR ":F0RX=1T 
012: BAMT (X)=TAMT(X) :NEXTX:TSW=1 : 
GOTO11350 

11390 LC=LC+2:TSW=0:GOTO11890 
11398 LC=0:FORX=1TO9:PRINT#-2:NE 
XTX : G0SUB113 20 : G0T0113 3 5 
114J30 YRSW=1 : CLS : PRINT§128 , "PLEA 
SE ENTER TODAY'S DATE. (SLA 
SHES MUST BE ENTERED) ": PRINT: PRI 
NT"DATE (MM/DD/YY) ... » ; : INPUTDT 
$ : GOSUB11950 : GOSUB11985 : G0SUB117 

11405 CLS:PRINT@96,"I AM PRINTIN 



iscoseeeseeceeeosocrseo 



THE SO FTWARE HOUSE 

SOOPER OUR OWN 

DOOPER §LJ "BRAND" 

DISKS Q LABEL 

PROGRAMMER'S DISKS 

SS/DD 10/$ 9.00 100/S80.00 
DS/DD 10/310.00 100/S90.00 

SENTINEL COLORS Gift Boxed 

13 COLOR DISKS FOR $13.95 

w/Tyvek Sleeves & ..aoe/s 
100% Certified - Lifetime Warranty 

COLOR RIBBONS: Red, Green, Blue, Brown 
GEM/OKI 4/S10.00 
EPSON 4/S24.00 
APPLE/NEC 4/S24.00 

Media Mate Disk Bank $12.95 
Head Cleaner Kit $6.95 

Add $2.50 S/H in U.S.A ■ Canada Add S3.50 

Michigan Residents Add 4% Sales Tax 
Send check or money order payable to: 

THE SOFTWARE HOUSE 

9020 Hemingway, Redford, Ml 48239 
- — i (313)937-3442 

/ VISA I Send Card Number and Exp. Dale 

MMMM Min. Charge Order S20.00 



G A SUMMARY OF THE TRANSACTIONS 

FOR THE YEAR." 
114J38 LC=0:I=1:SUMTOT=0 
114 lp PRINT #-2, "TRANSACTION SUMM 

ARY FOR" ; YEAR ; " A/jS " ; DT$ : PRI 

NT#-2:PRINT#-2,"ACT ACCOUNT 

DESCRIPTION AMOUNT...": 

PRINT#-2: 

1142J3 IF YTOT(I)=,0 THEN 11430 EL 

SE PRINT#-2,USING"###%%% 

; I ; " " ; DA$ ( I ) ; " " ; YTOT ( I ) : SUMT 

OT=SUMTOT+YTOT ( I ) : LC=LC+1 : IFLC=5 

0THEN11440 

1143J3 1=1+1 :IFI=lj31THEN11450ELSE 

11420 

11440 1=1+1: IF 1=101 THEN 11450 

ELSE F0RX=1T012:PRINT#-2:NEXTX:L 

C=0:GOTO11410 

114 50 YRSW=0:CLOSE#1:PRINT#-2:PR 

INT#-2,USING"% 

%% %$###, ###.##-";SPAC 
E$ ; "TOTAL " ; SUMTOT : LC=LC+2 : SUMT 
OT=0:FORX=LC TO 61: PRINT#-2 :NEXT 
X:LC=0: GOTO 160 
11500 CLS: PRINTS 12 8, "WHICH MONTH 

DO YOU WISH TO LIST";:INPU 
TA:IFA<1 OR A>12 THEN11500 
11515 GOSUB11960:GOSUB11950:GOSU 
B11980 : G0SUB11985 : GOSUB11700 : CLS 
:PRINT@128,"I AM PRINTING ACTUAL 

VS. BUDGET FOR " ;MO$ (MO) ; YEAR 
11520 LC=0:I=1:ACTOT=0:SUMBUD=0 
11525 GOSUB11650:PRINT#-2: PRINT* 
-2," ACT ...DE SCRIPT I 
ON ACTUAL BUDGET 



AMATEURS: See Us (WD8KJV) at: Y'all 
Miami Hamboree, Feb. 8 & 9 Come 



One-Liner Contest Winner . . . 

With this one-liner, you can enter the amount of 
your paycheck, key in the amounts of your monthly 
bills and see how much is left. 

The listing: 

CLS :PRINT@8, "QUICK BUDGET": PRI 
NT: INPUT" AMOUNT OF PAYCHECK 
"; A: CLS: INPUT" NUMBER OF B 
ILLS " ; B : CLS : F0RX=1T0B : PRINT : INPU 
T" AMOUNT OF BILL" ;C: BB=A- 
C: PRINT" PAYCHECK LEFT"BB 
: FORZ=1TO3000 : NEXT : A=BB : NEXTX : CL 
S: PRINT" PAYCHECK LEFT 

David V. Haas 
EglinAFB, FL 



(For this winning one-liner contest entry, the author has been sent copies 
of both The .Second Rainbow Book Of At/ventures and its companion The 
Second Rainbow Adventures Tape.) 
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.. VARIANCE." :PRINT#-2 
11530 IF MID$(DA$(I) ,1,5)="XXXXX 
" THEN 1155)3 ELSE PRINT#-2 , USING 

%###,###. ##-";" ";i;" ";da$(i 

j. ii »;TTOT(I) ;» ";CTOT(I) ;" 

" ; CTOT ( I ) -TTOT ( I ) : ACTOT=ACTOT+ 
TTOT(I) : 

11535 SUMBUD=SUMBUD+CTOT(I) :LC=L 
C+l : 

11550 1=1+1: IFI=101THEN11560ELSE 
IFLC=50THEN11555ELSE11530 
11555 FOR X=LC TO 61 : PRINT#-2 : NE 
XTX: LC=0 : GOT011525 
11560 PRINT#-2:PRINT#-2,USING"% 

%% %% 

##,###. ##-" ;SPACE$ ; "TOTAL >» 

.if »;ACTOT;" " ; SUMBUD ; " ";SUM 
BUD-ACTOT : FOR X=LC TO 59:PRINT#- 
2 : NEXTX : YRS W=0 : GOTO 1 60 
11600 YRSW=1:CLS:PRINT@12 8, "ENTE 
R MONTH FOR WHICH YOU WISH TO L 
1ST YEAR TO DATE THROUGH . " : PRINT 
:INPUTA:IF A<1 OR A>12 THEN11600 
11610 GOSUB11960:GOSUB11950:GOSU 
B11980 : GOSUB11985 : GOSUB11700 : 
11615 CLS:PRINT@128,"I AM PRINTI 
NG YEAR TO DATE DATA. " :GOTO11520 
11650 IF YRSW=1 THEN 11660 ELSE 
PRINT#-2," ACTUAL VS. BUDGET FO 
R " ;MO$ (MO ); YEAR: RETURN 
11660 PRINT #-2," YEAR TO DATE A 
/O " ;MO$ (MO) ; YEAR: RETURN 

11699 GOSUB11700:GOTO11800 

11700 CLS:PRINT@96,"THE 1ST PRIN 
T LINE SHOULD BE ABOUT 3/4 IN 
CHES FROM THE TOP OF PAPER. PL 
EASE ALIGN. WHEN PAPER IS ALI 
GNED PROPERLY TYPE <YES> IN RES 
PONSE TO QUESTION. ": PRINT: PRINT" 
IS PRINTER READY"; :INPUTA$:IFA$= 
"YES"THENRETURNELSE11700 

11800 1=1 : LC=0 : CLS : PRINT@98 , "PRI 

NTING CHART OF ACCOUNTS .": OPEN " 

D" , #1, "CHRTACCT/DAT" , 30 

11810 PRINT#-2," ACT < 

— D ESCRIPTIO N — >":PRIN 

T#-2 : 

11820 GET#1,I:INPUT #1,DESC$:D$= 

MID$ (DESC$ ,1,5): IFD$="XXXXX"THEN 

11825ELSEPRINT#-2, USING"% 

%";» ";l;" ";DES 

C$ : LC=LC+1 : 1=1+1 : IFLC=50THENGOSU 
B11880ELSEIFI=101THEN11889ELSE11 

820 

11825 1=1+1: IFI=101THEN11889ELSE 



11820 

11830 GOTO11810 

11880 F0RX=1T014:PRINT#-2:NEXTX: 

LC=0 : RETURN 

11889 LC=LC-4 

11890 FOR X=LC TO 59 : PRINT#-2 :NE 
XTX : LC=0 : CLOSE# 1 : GOTO160 

11900 GET#l,I:INPUT#l,ACNO,MO,DA 
, YR , CHK , AMT , PRP$ , PST : RETURN 
11910 PRINT#-2 : LC=LC+1 : IFLC=59TH 
EN160ELSE11910 

11950 CLS:PRINT§9 6,"ONE MOMENT P 
LEASE, I AM LOADING ACCOUNT DESC 
RIPTIONS . " : OPEN "D" , #1, "CHRTACCT 
/DAT" , 30 : FORI=1TO100 : GET #1 , I : IN 
PUT # 1 , DESC$ : DA$ ( I ) =DESC$ : NEXTI : 
CLOSE #1: RETURN 

11960 CLS:PRINT§128,"I AM CHECKI 
NG TO SEE IF THE DATAFOR THE MON 
TH YOU SELECTED IS ONFILE. " :MO=A 
:OPEN "D",#l, "FILENAME/ DAT", 21 :F 
0RI=1T012:GET #1,1: INPUT #1,YEAR 
, FLE$ : FL$ ( I ) =FLE$ : NEXTI : CLOSE# 1 
11965 IF FL$(MO) = "ZZZZZZZZ/ZZZ 
" THEN 11970 ELSE RETURN 
11970 PRINT: PRI NT "DATA FOR THE M 
ONTH YOU ENTERED IS NOT ON FILE 
. I AM RETURNING TO MENU. "".FORT 
=1TO3000:NEXT T:IF DLSW=1 THEN 1 
2030 ELSE 11000 

11980 CLS: PRINT© 9 8, "I AM LOADING 
BUDGET DATA.": OPEN "D",#1,"BUDG 

ET/DAT" , 128 : FORI=1TO100 : GET #1,1 
: INPUT #1 , YEAR: F0RX=1T012 : INPUT 
#1,BAMT(X) : NEXTX: IF YRSW=1 THEN1 
1982ELSECTOT(I)=BAMT(MO) 

11981 NEXTI :CLOSE#l: RETURN 

11982 FOR 11=1 TO MO: CTOT (I) =CTO 
T(I)+BAMT(II) '.NEXT II:GOT011981 

11985 CLS:PRINT@96,"I AM LOADING 
ACTUAL DATA.": OPEN "D",#1,"TRAN 

SFLE/DAT" , 128 : FORI=1TO100 :GET#1, 
I : INPUT#1, YEAR: F0RX=1T012 : INPUT# 
1,TAMT(X) :YTOT(I)=YTOT(I)+TAMT(X 
):NEXTX:IF YRSW=1 THEN11987ELSE 
TTOT (I) =T AMT (MO) 

11986 NEXTI :CLOSE#l: RETURN 

11987 FOR 11=1 TO MO: TTOT(I)=TT 
OT(I)+TAMT(II) :NEXT II:GOT011986 
12000 CLS: PRINTS 12 8, "I AM LOADIN 
G MAIN PROGRAM. " : RUN"EXPTRAKR" 
13000 TRSW=1 : RN$="ACTUAL" : GOSUB1 
19 50:FORX=1TO12:TAMT(X)=0:NEXTX: 
GOSUB11700 : OPEN "D" , #1 , "TRANSFLE 
/DAT" , 128 : 1=1 : LC=0 : ACNO=I : GOTOll 
310 

18000 CLS0:PRINT@192,"SO LONG TI 
LL NEXT TIME. MAY ALL YOUR EXPEN 
SES BE SMALL.": PRINT: END &s 
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NEW 

DISK 
DRIVES 



lligilfflRhw . 



■^^iBRSSfo? 



New Low Price ! 



' 'iiT ^*|" rrm h 

uuu , 




40Tks 6Ms 

Double Sidecl 
Double Oensily 



STARTING AT 

$ 89, 



95 



40 or 80 Tracks 

1/2 Hght.Teac/Panasonic 



TANDON MPI TEAC 



WITH CASE & 
POWER SUPPLY 

$12995 




Speed 6 ms tk to tk and up 
Capacity 250k unformatted 
Tracks 40 
Warranty now 1 YEAR 

We carry only the finest quality disk drives -no seconds- no surplus 

SATISFACTION GUARANTEED!! all drives fully tested&warranteed 

Complete Disk Drive with Power Supply&Case t??? $129.95 

Two Drives in Dual Cases Power Supply Teac J&2-7&95 CALL 

1/2 ht double sided double density Disk Drives .(Panasonic/ Teac )$, $119.95 
1/2 ht double sided double density Disk Drive with ps&case,'..., ^$409333 CALL 
low to use your new drive system on audio cassette 

Single ps&case $44.95 Dual 1/2htps&case $54.95 Dual ps& case.. Call 





$129.95 



Color Computer Controller fj&M) 

DRIVE FOR RADIO SHACK COLOR COMPUTER 

TANDON, MPI OR TEAC DRIVE(SINGLE SIDED 40 TRACKS SPEED 5MS TRK TO TRK& UP) 
POWER SUPPLY and CASE, TWO DRIVE CABLE WITH ALL GOLD CONNECTORS . 

c,A J&M CONTROLLER, MANUAL and DOCUMENTATION $,249^ $ SALE! 

*** . DRIVE 6 FOR RADIO SHACK COLOR COMPUTER 






PANASONIC 1/2 HEIGHT DOUBLE SIDED DOUBLE DENSITY DRIVE 500K unformatted 



H& 



\\ 



KUWtH SUHHLYand IJASt, £ UHlVt t-AbLt Wl I H ALL IjOLD CONNfcCTOHS ,QB' . _ . 

J&M CONTROLLER, MANUAL and DOCUMENTATION $2.7&§5". X,,. SALE! 

TAKE ADDED SAVINGS ON TWO DRIVE SYSTEMS _M ^ .oo.sKa.tes 

DISKETTES with free library case JM m..f^lT.TT. $17.95 

Unadvertised Specials J^WTl $Call 

Drives cleaned, aligned & tested # ■ ,,!• 

TECHNICAL STAFF ON DUTY, PLEASE CALL FOR ASSISTANCE. 



$29.95 



CALL US TODAY!! 
1 ORDER TOLL FREE 




(617)234"7047 *DEALER INQUIRIES INVITED. 

1-800-635-0300 (617)234-7047 

TRUE DATA PRODUCTS 



195 Linwood Street, P.O. Box 546 
Linwood, Massachusetts 01525 
(617) 234-7047 



We welcome 
Visa /Master Charge t^j3|f- 



HOURS MON -SAT 9-6 (EST) 



• Checks(allow 2 weeks for clearing) 

• C.O.D. Add $2.00 



New Hard Drives 

COMPLETE SYSTEM JUST PLUG IN - 



Call For 
BEST PRICE 






^^ QUALITY 
VIDEO MONITORS 

Starting at £ 7Q 

MONOCHROME 
COLOR MONITORS 



Warranty - One Full Year 




VIDEO DRIVER 



ENABLES YOUR COCO TO OPERATF WITH A 
VIDEO MONITOR INSTEAD OF A TELEVISION! 



5 to 20 Megabyte, ready to run on the TRS 
80 Model I/III/IV/4P, color computer, 

SCREEN DUMP PROGRAM 

C4rx UrUnAULb jJJ The best screen dump program for the Epson & Gemini 

printers ever!! Have the option o( standard images 
or reverse w/regular or double sized pictures s-j (Vj; 

sp-3 interface for Color Computer 

■ 300-19.200 BAUD rates 

■ External to printer — No AC Plugs 

■ Built in modem/printer switch — no need for 
Y-cables or plugging/unplugging cables 




PRINTER CABLES AND 
INTERFACES AVAILABLE 
Call tor current pricing 



• 100 ■ 120 - 160 CPS 
' Bidirectional Logic Seeking 
' Friction and Tractor 
' 9X9 Dol Matrix 

• True Decenders 

• High Res-Bit Image Block Graphics 
GEMINI 10X (9 Inch Carriage. 120cps) Friction and Tractor SCALL 
GEMINI 15X (15 Inch Carnage. 120cps| Friction and Tractor SCALL 
DELTA 10 (10 Inch Carriage. 160cps) Friction and Tractor SCALL 

POWER TYPE tetter quality 



Super Scripl-Subscript 

Underlining 

Backspacing Doubleslnke 

5. 6. 8 1/2. 10. 12 and 17 Pitch 

Programmable Line Spacing 

SIX (6) MONTH WARRANTY 



Only: 

$£9^5 




CM J 




COMPLETE SYSTEM 







«i* 



now 
with 
screen 
dump 



$239 



SG-10 



Nothing more to buy! 

Dealer inquiries invited 



■ 


I 





TRUE DATA PRODUCTS 

195 Llnwood Street, P.O. Box 546 
Linwood, Massachusetts 01525 



CALL US TODAY!! 
ORDER TOLL FREE 



(617)234-7047 

1-800-635-0300 
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Building Language 
Arts Skills 



By Steve Blyn 
Rainbow Contributing Editor 



u 



B 



i ack to basics" skills are the 
trend in many school sys- 
'tems throughout the coun- 
try. This renewed emphasis on the 
traditional language arts and math 
skills is probably the most popular way 
computers are currently being used in 
schools. These types of programs are 
commonly referred to as C.A.I. — 
Computer-Assisted Instruction. 

Way before the age of computers 
arrived, there existed many wonderful 
skill series of language arts workbooks. 
One such series is published by Barnell 
Loft, Ltd. These workbooks cover a 
wide range of skills, including following 
directions, using the context, locating 
the answer, getting the facts, getting the 
main idea and drawing conclusions. 
The individual booklets are available 
for the first grade up to high school 
level. 

Almost every school I have visited 
uses some of these skill booklets. I have 
used them in my classroom for several 

Sieve Blyn leaches both exceptional 
and gifted children, holds two master's 
degrees and has won awards for the 
design of programs to aid the handi- 
capped. He owns Computer Island and 
lives in Stolen Island, New York. 



years. This month's program is an all- 
purpose language arts program. It is 
easily adaptable to any of the ideas 
presented in such skill books. 

By varying the types of questions, this 
program can be geared to any of the 
mentioned skill areas. Similarly, the 
program can be made suitable for 
almost any level by changing the story 
content as well as the questions. 

One might ask, "Why is it necessary 
to replicate on the computer what 
already exists in booklet form?" Tsk! 
Tsk! There are several very good rea- 
sons. 

Computers may be presenting similar 
material, but through a very different 
medium. Children are naturally at- 
tracted to computers and sometimes 
learn better through them than by 
traditional means. Computers have the 
ability to give immediate feedback to 
the student — you know at every step 
of the way whether you are succeeding 
or not. 

Computers are also impersonal. By 
that, I don't mean they don't have any 
personality. Morris, my original CoCo, 
is very dear to me and has practically 
become a family member. (We do cele- 
brate his birthday.) By impersonal, I 
mean they are tireless reformers of 



mistakes. They do not complain to the 
user, nor do they make any judgments 
against the user. It is almost impossible 
for a person to remain impartial to 
successes and failures as computers do. 

The program presents part of the 
"Jack and the Beanstalk" story. This is 
located on lines 90 and 100. Our story 
is merely used as an example. The 
choice of story and the grade level for 
which it is written should be yours. The 
story of Jack was taken from a third- 
grade reader. 

A series of questions about the story 
is placed in the DATA lines 260-390. Our 
questions use a scattered approach:They 
purposely do not cover any one specific 
skill area. They are meant to illustrate 
the variety of questions you may use. 
They even go beyond the Barnell Loft 
areas mentioned earlier. Your questions 
can be as diverse as your imagination or 
just remain with one skill area. 

Fourteen questions were entered as 
illustrations. We chose the number 14 to 
show you that we are not limited only 
to 10 questions. Often, computer new- 
comers think there is something magical 
about the number 10 or its multiples. 
Not so! A short program such as this 
one can have literally hundreds of 
questions entered. You must, however. 
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tell the computer how many questions 
to read. Our number of questions is 
indicated in the dimension statement on 
Line 30 and also on lines 40 and 50. Be 
sure to include the number of questions 
you use on those lines. 

The program is set to ask 10 of the 
story questions each round. Common 
sense dictates that rounds come in sets 
of 10 questions. Other numbers that 
divide evenly into 100 are also good 
choices. The questions appear one at a 
time and do not repeat in a given round. 

Correct answers receive a happy tunc 



and a message that says "correct" on 
Line 210. The incorrect answers, how- 
ever, are really the important ones. 
Each time a question is answered incor- 
rectly, its question and correct answer 
are stored in lines 400-420. This makes 
possible a review of these questions and 
answers. This is similar to a study- 
review sheet. 

The program handles the review on 
lines 430-480. If you have a printer, it 
is a good idea to print out the review for 
the student's future reference. To get a 
printout, change the PRINT statements 



on lines 430, 440 and 460 to PRINTtt- 
2, statements. You may add these to the 
existing lines to get the output on both 
the screen and the printer. 

It is hoped that you use this program 
as a model for incorporating your own 
versions. You may create fun programs 
to reinforce children's favorite stories or 
programs to strictly strengthen specific 
language arts skills. A combination of 
the two might be the best route to go. 
Remember to save each of your versions 
on tape or disk before proceeding to 
your next creation. □ 




The listing: F I NDWDRD 

10 REM"FIND THE WORD" 

20 REM"STEVE BLYN, COMPUTER ISLAN 

D,NY,1986 

30 DIM A$(14) ,B$(14) ,X$(10) ,Y$(1 

9>) 

40 FOR T=l TO 14: READ A$(T),B$(T 

) :NEXT T 
50 R=RND(14) 
60 XY=RND (-TIMER) 
70 CLS 

80 PRINT@3 2,STRING$ (3 2,207) ; 
90 PRINT" JACK CLIMBED THE BEA 
NSTALK A SECOND TIME. HE WAS AGA 
IN HELPEDBY THE GIANT'S WIFE. TH 
IS TIME HE TOOK THE HEN THAT LA 
ID THE GOLDEN EGGS. HE ESCAPED 
QUICKLY."; 

1 JACK PICKED UP THE M 
ON HIS THIRD TRIP. BUT 
CALLED OUT AND WOKE TH 
THE GIANT BEGAN TO CHA 



100 PRINT 1 

AGIC HARP 

THE HARP 

E GIANT. 

SE JACK." 

110 N=N+1 

PRINT@0,"N=";N;" ** JA 

** R=";CR; 

IF N>10 THEN GOTO 430 

PRINT@352,STRING$(32, (RND(12 
8)+127)) ; 

150 PRINT§416,STRING$(95," " ) ; 
160 PRINT@384,"TRY TO FIND THE W 

THAT ..." 

IF R>13 THEN R=0 

R=R+1 

PRINTA$(R) 

INPUT C$ 

IF C$=B$(R) THEN PLAY"L100CE 
GCEGCC": PRINT "CORRECT. PRESS ENT 
ER TO GO ON" ; :CR=CR+1 
220 IF C$<>B$(R) THEN PLAY "L4CC 



120 
CK 
130 
140 



ORD 
170 
180 
190 
200 
210 



":PRINTB$(R) " IS THE ANSWER. ";:G 

OSUB 400 

230 EN$=INKEY$ 

240 IF EN$=CHR$(13) THEN 110 

250 GOTO 2 30 

2 60 DATA IS A COMPOUND WORD, BEAN 
STALK 

270 DATA IS A COLOR, GOLDEN 

280 DATA HAS AN APOSTROPHE, GIANT 

'S 

290 DATA IS THE OPPOSITE OF HUSB 

AND, WIFE 

300 DATA IS GOOD TO EAT FOR BREA 

KFAST,EGGS 

310 DATA MEANS MORE THAN TWO TIM 

ES, THIRD 

3 20 DATA MEANS 
MALL, GIANT 
330 DATA MEANS 
QUICKLY 
3 40 DATA MEANS 
AGE, TRIP 
350 DATA 
L,HEN 
3 60 DATA 
,HARP 
370 DATA 
UT 
3 80 DATA 

ABOVE , THE 
390 DATA THAT 
CK 
400 
410 
420 
430 



THE OPPOSITE OF S 
THE SAME AS FAST, 
THE SAME AS A VOY 
IS THE NAME OF AN ANIMA 
IS A MUSICAL INSTRUMENT 
IS THE OPPOSITE OF IN,0 
THAT .APPEARS MOST OFTEN 
IS USED 4 TIMES, JA 



X$(J)=A$(R) :Y$(J)=B$(R) 

J=J+1 

RETURN 

CLS: PLAY "CDEFG" :PRINT"HERE I 
S YOUR REVIEW" 
440 IF CR=10 THEN PRINT : PRINT "VE 
RY GOOD ... 100%": GOTO 490 
4 50 FOR K=0 TO J-l 
460 PRINT K+l;" .";Y$(K) ;" IS THE 

WORD THAT" : PRINTX$ (K) : PRINT 
470 EN$=INKEY$ 

480 IF EN$=CHR$(13) THEN NEXT K 
ELSE 470 
490 END ^ 
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EDUCATION OVERVIEW 



Educating with 

Electronic Communications 

and Research 



By Michael Plog, Ph.D. 
Rainbow Contributing Editor 



In case you have not tried your free 
hour on the Delphi telecommunica- 
tions network, I strongly encourage 
you to take advantage of this offer from 
THE rainbow. Like many of you, I have 
been playing around with Delphi for a 
while now, trying to learn the shortest 
way to get from one point to another. 

The folks who created the Delphi 
system must have been poets, because 
the name itself implies majesty, mystery 
and a reference to answers. "Delphi" 
was a special place to the ancient 
Greeks. It was the most important 
Greek temple and home of the oracle of 
Apollo. Also, the Greeks considered 
Delphi to be the center of the world. In 
the temple itself, a stone marked the 
exact spot of the world's center, called 
the "navel." 

The term "oracle" is actually a Latin 
word, not Greek. Traditionally, the 
oracle at Delphi belonged first to 

Michael Plog received his doctorate 
degree from the University of Illinois. 
He has taught social studies in high 
school, worked in a central office of a 
school district and currently is em- 
ployed at the Illinois Slate Board of 
Education. 



Mother Earth. Apollo either stole the 
oracle or was given it by Mother Earth. 
The medium of the oracle (the person 
actually doing the speaking) was always 
a woman over 50. The procedures to 
obtain an answer from the oracle were 
complex and rigid. A "reading" could 
only be given at certain times of the 
year. A ritual cake was required, along 
with a sacrificial animal conforming to 
rigorous physical standards. 

The oracle and her consultants 
bathed in a special spring, drank from 
a sacred stream, then entered the tem- 
ple. The oracle went to a basement cell 
in the temple, sat on a sacred tripod and 
chewed leaves of the laurel tree (this was 
Apollo's special tree). While sitting and 
chewing on the leaves, the oracle would 
speak. Her words, however, were not 
given directly to the person asking the 
question. They were interpreted and 
written by the priests, often in highly 
ambiguous verse. 

Delphi has been continuously inha- 
bited since the 14th century B.C. The 
height of the oracle's prestige and 
popularity was in the 4th century B.C. 

When you stop and think about it, the 
present electronic Delphi is somewhat 
similar to the ancient oracle. People 
approach with a question or a need for 



information. It is always helpful to have 
a ritual cake (maybe a sandwich, but I 
find it easier to use a cookie). The 
sacrificial animal has been replaced 
with a plastic credit card, but still 
requires rigorous standards. (If you 
don't pay, you don't stay.) Your compu- 
ter does not have to be in a basement, 
but you are figuratively apart from the 
rest of the world. The messages we 
receive from our electronic oracle are 
sometimes ambiguous. 

I have learned a few things while on 
Delphi, other than about the system 
itself. It seems that everyone wants a 
RAINBOWfest held in a city close to 
where they live. Most of the Color 
Computer users responding to a poll 
have one or more disk drives. Of the 29 
respondents to one poll, 75 percent of 
them use more than one disk operating 
system for their Color Computer. I have 
also read some interesting messages 
about modems and operating systems, 
and have obtained some public domain 
software. 

I wonder about educational applica- 
tions of Delphi for schools and stu- 
dents. It seems that two major applica- 
tions can be expected. First is the 
communication potential of Delphi. 
You can send messages to other people 
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(perhaps those having some special 
expertise) and share ideas with others of 
a similar interest. The second benefit for 
education is the research capabilities of 
Delphi. 

The idea of communicating with 
other people with similar interests is 
important for the field of education. 
Several bulletin board services exist for 
special interest groups in education. 
These services connect people with 
similar interests and can serve many 
functions. For example, local school 
districts can send applications for spe- 
cial funding to state agencies or foun- 
dations by electronic means. One spe- 
cial interest group, educators for the 
handicapped, has an electronic com- 
munications service with one of the 
features being updates on proposed 
legislation. Subscribers know what is 
being discussed in Washington and have 
an ideal opportunity to contact their 
representatives and encourage a vote 
one way or the other. 

Electronic research capabilities have 
revolutionized decision making in busi- 
ness and government, but not yet in 



schools. Delphi has a connection with 
a system called DIALOG, a collection 
of over 200 databases. Some of these are 
highly specialized, technical databases, 
such as medical experiments or legal 
search organizations. A person might 
want to know how many microcompu- 
ters were sold to schools last year; 
searching the appropriate database 
provides the answer. 

The problems involved in using elec- 
tronic research are generally cost and 
training. The price for using some of the 
databases can be very high. Some of the 
specialized databases can cost thou- 
sands of dollars per year, plus online 
connection time. Most schools are not 
willing to incur such expenses for stu- 
dent projects. Also, each database 
requires special procedures for search- 
ing. Those procedures can become 
complex for the untrained person. 

I believe these problems will be elim- 
inated in the near future. The proce- 
dures for specialized searching are a 
matter of software. Computer profes- 
sionals are currently working on new 
languages to help the human and ma- 



chine understand each other better. The 
cost factor may be a little more difficult 
to solve. It is expensive to maintain even 
a simple database — a lot of time is 
required (which must be paid for by 
someone). A lot of expensive equipment 
is also necessary to provide a database. 
The more people who use such systems, 
however, the less each will have to pay. 

Will we ever reach a time when elec- 
tronic communications and research 
are common practices for elementary 
and secondary students? Will we have, 
for example, a sixth-grade student in 
Florida writing a report about earth- 
quakes, and including as part of that 
report, an interview with a California 
student who recently experienced an 
earthquake? 

The future is unknown; our current 
Delphi oracles only share present infor- 
mation, not future happenings. How- 
ever, if you or your school is using 
electronic communications or research, 
1 would like to know about it. Please 
share your experiences and efforts. My 
Delphi username is MPLOG — why 
not drop me a line? □ 
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To make the'most of your new Dragon microcomputer from Dragon-Tano, you need Dragon User 
— the international, independent magazine for Dragon owners. 

Each issue of Dragon t/sercontains: • program listings covering games and utilities 

• reviews of the latest software • reviews of Dragon peripherals and add-ons 

• programming advice for beginners • technical advisory service 

• hardware projects • programming articles for users 



The Dragon microcomputer was launched in the UK 
last year Since then we have developed a knowledge 
and mastery ol the machine's abilities. You can 
benefit fron our experience by subscribing to 
Dragon User, which is expanding ns coverage lo include 
all US developments. 

To make sure that you receive a copy of Dragon User 
regularly, subscribe direct to us. This costs only S29.95 
'or 12 issues airspeeded to you - or take advantage of 
our special offer to long-term subscribers. Individual 
copies of the magazine can be obtained from your 
Dragon dealer. 
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ney by taking out a 

I 
I 
I 

30a airspeeaeo lj u:>9Z».ao rur i^issuuv i yeai ^_ 
SS71 90 lor 36 Issues Send this form lo K) 

Inlornalional, 205 E -12nd Si.. NewVorK. NY 10017. 



Subscription order form. Receive a Iree book and save mo 

long- lerm subscription - a two-year subscription saves 10% . a three-year 

subscription saves 20% In addition, long term subscriber will receive a Iree 

copy ol either □ The Working Dragon or CJ Dragon Games Master Please send 

a check, made payable to Dragon User, with this form 

Start my subscription from the lollowing issue 

Name - 

Address 



Signed 

Sub5cnplion rates US and Canada airspeeded D US$29.95 for 12 issues/ 1 year 
H US$53 DOior 21 issues HU" 
Dragon UsBl •/, Business Press I 
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Metric Industries 



Looking for an Interface? 

Look no further. Interfaces for as low as "39.95 



Model 101 
$39.95 



Interface 



The Model 101 is a serial lo parallel 
interface intended tor use wilh a COCO 
and any Centronics compatible parallel 
input primer. The 101 has 6 switch 
selectable baud rates (300-9600). The 101 
is only 4" x 2" x 1 ' and comes with all 
cables and connectors lor your computer 
and printer. 




Model 104 Deluxe 
Interface $51.95 ^ 



* 



The Model 104 is a serial to parallel 
interlace like the Model 101 but it has 
the added lealure ol a serial porl 
(sometimes referred to as a modem 
swilch). This lealure allows the connection 
ol a parallel printer and any serial device 
(modem, serial printer etc.) lo /our 
computer You may then select either 
oulpul. serial or parallel, with Ihe (lip ol a 
switch. The 104 is only 4.5" x 2.5" x 1.25" 
and comes with all cables and connectors 
tor your computer. You supply the serial 
cable lor your modem or other serial 
device. 



Model 103 Combo 
$68.95 

With the turn ol a knob the model 103 
switches your computer's RS232C serial 
port lo any one ol 3 outputs — 2 serial 
and 1 parallel. The serial ports may be 
used for modems, serial printers or even 
another compuler. The parallel port can 
be used with any Centronics compatible 
primer. The 103 has Ihe best features 
Irom Ihe 101 and 102: color coded 
position indicator lights, 6 swilch 
selectable baud rales, heavy anodized 
aluminum cabinel, and many more. 




Model 102 Switcher 
$35.95 

The Model 102 has 3 switch positions 
lhat allow you to swilch your computer's 
serial output between 3 different devices 
(modem, printers or another computer). 
The 102 has color coded lights lhat 
indicate the switch position. These lights 
also act as power indicators to let you 
know your computer is on. Supplied with 
the 102 are color coded labels lhat 
can be applied to your accessories. The 
102 has a heavy guage anodized 
aluminum cabinet with non-slip rubber 
leet. 




Cassette Label 
Program $6.95 



' 



This lancy printing utility prints 5 lines ol 

inlormation on pinleed casselte labels. 

"Cassette Label" is menu driven and is 

very easy lo use. It uses ihe special 

leatures ol your printer lor standard, or 

condensed characters. Each line ol 

text is automatically centered. Belore Ihe 

label is primed, il is shown on your 

CRT — enabling you to make changes ' t * 

you like — ihen prim 1, 2 or 100 labels. 

The program comes on tape and it is 

supplied with 24 labels to get you started. 

16K ECB required. 

Now saves & loads files from disk & tape. 



CM9CTTK Lftl*.L 'Murine, inn n. 
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Other Quality 
Items 

High Quality 5 Screw Shell G-10 
Cassette Tapes $7.50 per dozen 

Hard Plastic Storage Boxes lor 
Casselte Tapes $2.50 per dozen 

Pin Feed Cassette Labels 
White $a00 par 100 
Colors $3.60 per 100 (Red. Blue. 
Yellow or Tan) 



^ 




IMPORTANT! 

THE 101. 103 AND 104 ALL REQUIRE 
POWER IN ORDER TO OPERATE. MOST 
PRINTERS CAN SUPPLY POWER TO 
YOUR INTERFACE STAR, RADIO SHACK, 
AND OKIDATA ARE JUST A FEW THAT 
DO. EPSON DOES NOT THE 
INTERFACES CAN ALSO BE POWERED 
BY AN AC ADAPTER (RADIO SHACK 
MODEL 273-1431 PLUGS INTO ALL 
MODELS). IF YOU REOUIRE A POWER 
SUPPLY, ADD A "P" TO THE MODEL 
NUMBER AND $5.00 TO THE PRICE. 
(MODEL 101 P $44.95. MODEL 104P 
$5695 AND MODEL 103P $7395) 



The Model 101. 102, 103 and 104 will 
work with any COCO, any level basic and 
any memory size. These products are 
covered by a 1 year warranty. 

The Model 101, 103 and 104 work with 
any standard parallel inpul printer 
including Gemini, Epson, Radio Shack, 
Okidata, C loth and many others. They 
support BASIC print commands, word 
processors and graphic commands. 



To order call our 24 hour order line 513- 
677-0796 and use your VISA or 
MASTERCARD or request C.0.0 

Or send check or money order lo 
Metric Industries 
P.O. Box 42396 
Cincinnati, OH 45242 

Free shipping on orders over $50.00. 
Ohio residents add 5.5% sales tax. 
Orders under $50.00 please add $2.50 
for shipping. 

We manulaclure these products. Dealer 
inquiries are invited. 




WISHING WELL 



16K 
ECB 



RAINBOW 



The Wishing Well 
Title Maker 




By Fred B. Scerbo 
Rainbow Contributing Editor 



Editor's Note: If you have an idea for 
the " Wishing Well. " submit it to Fred 
c/o THE RAINBOW. Remember, keep 
your ideas specific, and don V forget that 
this is BASIC. All programs resulting 
from your wishes are for your use but 
remain the properly of the author. 



Some of you may have noticed that 
during the last 12 months the 
opening credits of most of my 
"Wishing Well" programs have taken on 
a slightly different look. While in the 
past 1 have used the Hi-Res graphics 
screens to make title cards, I haven't 
taken a liking to using the CHRS colors 
in the text mode to create introductory 
title screens. Since many of you have 
written and requested a way to create 
text graphics of this style on your own, 
this month's "Wishing Well" will be 
dedicated to fulfilling this task. 

The Motivation 

Over a year ago, the folks at RAINBOW 
asked me to create a new RAINBOW ON 



Fred Scerbo is a special needs instructor 
for the North Adams Public Schools in 
North Adams, Massachusetts. He holds 
a master's in education and has pub- 
lished some of the first software avail- 
able for the Color Computer through 
his software firm. Illustrated Memory 
Banks. 



TAPE title card. 1 had made the original 
logo back when the tape format first 
came out and we were looking for 
something a little more classy. Since at 
the time 1 had just completed a "Wish- 
ing Well" series on creating additional 
colors in PM0DE4, I decided to use those 
colors for the actual graphics. 

As those of you who have followed 
this column will recall, creating these 
extra colors takes a little time since the 
pixel patterns must be set and placed in 
an array. Usually, I would tie up the text 
screen with CLS8 so the user would not 
see the colors being created. 

When it came time to make the RAIN- 
BOW ON TAPE logo, 1 felt that the user 
should not have to stare at a black 
screen for what might seem like an 
eternity while the graphics being created 
on the Hi-Res screen was kept hidden 
from view. Therefore, 1 chose to have 
the text screen display the words "Fal- 
soft Inc. presents" in large block letters 
while this graphics manipulation took 
place out of sight. 

For this, 1 used a character set that 
1 created for my math program, Multi- 
Math Driller. However, when I in- 
cluded the text generator that created 
these large, multicolored block letters, 
the RAINBOW ON TAPE menu program 
was too long. To solve this, I used the 
generator to create my characters and 
then went through the slow process of 
examining the text screen memory 
locations to determine which CHRS 
codes made up the graphics I had just 



created. Thejob took a little longer than 
I wanted, but the result was satisfying. 
In fact, it brought to mind one of the 
rules of programming 1 learned years 
ago: the greater the time spent by the 
programmer, the less the time spent by 
the user. (The reverse of this is also 
true.) 

As more programs for "The Well" 
required title cards, I started using this 
technique more often. Each time, how- 
ever, I streamlined the process so it 
would take less time. By the time I got 
to creating Tri-Planetary Hangmen- 
oids, the character set no longer was 
suitable since 1 needed smaller, more 
compact letters for longer words. 

This led to my writing a short routine 
to allow me to use the arrow keys for 
a simpler drawer-type program on the 
text screen. However, each time I 
created a screen, 1 had to go about 
analyzing the memory locations one 
line at a time. It worked, but it was slow. 



The Wish 

Meanwhile, many "Wishing Well" 
readers have kept a close watch on my 
title cards and asked over and over, 
"When will you give us a program to 
make title cards like these?" Some 
readers even wanted to use this tech- 
nique for creating a string of titles to use 
for TV displays. 

Since all of my efforts had been 
fractional up to this point, 1 finally 
decided to put all the pieces together in 
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a usable program that would not only 
create the text' and analyze the screen 
memory locations, but write the final 
BASIC program itself! To make the 
program as flexible as possible, the 
program would have to use both a 
combination of arrow keys and a direct 
input format that would change text to 
large letter characters. The end result of 
these wishes is The Wishing Well Title 
Maker, which you will find listed here. 



The Program 

Because of a few commands used by 
the program, 1 have written it to work 
with I6K Color Extended BASIC, and 
not just Color BASIC. The program it 
produces will work in Color BASIC, 
however, since the program consists 
only of DATA statements of the CHRS 
codes needed to create your screen. 

The way the program works is actu- 
ally quite simple. Let's say you have 
created a screen you wish to use. (I'll 
explain all the steps later.) You have two 
options. You may save the screen's 
memory locations in machine language 
to either disk or tape. This allows you 
to save a screen you have been working 
on and reload it later for other altera- 
tions. 

Your other option, if you are satisfied 
with your results, is to use the "analyze" 
option, which will create the complete 
BASIC program to redraw your screen 
independently of the original program. 
The way the analyze option works is to 
start at the bottom line of the screen 
available and check all its locations to 
see if they are filled with black blocks 
of CHRS ( 128 ) . If the row is completely 
black, the program keeps moving up a 
row until it finds characters. This pre- 
vents us from having a really long 
program of DATA statements if only a 
few lines are needed. 

Once the bottom row of characters is 
found, the program returns to the top 
row and analyzes each block to deter- 
mine the CHRS code by peeking at the 
screen location in memory. Whatever 
value is found in that location, the 
number will have 128 subtracted from 
it. Later, when the number is used from 
DATA, 128 is added to it. This saves a 
byte here and there by keeping our DATA 
numbers as low as possible. Also, in 
cases where the CHRS is 128 (a black 
box), the value will end up as zero for 
our DATA line. 

Rather than eat up memory by hav- 
ing a zero in a DATA line, the program 
will leave nothing between the commas. 



The new program will thus later read a 
zero and add 128 to it, giving us our 
CHR$(128). This also explains why you 
will often see my DATA lines with strings 
of commas. These are zero values and 
I am simply trying to save some space. 
Look at the beginning of this listing and 
you will see what I mean. 

In the analyze mode, the program 
writes a file in ASCII to either disk or 
tape. This ASCIt file can later be loaded 
directly into memory as a BASIC pro- 
gram that you can add to later. You may 
even merge this file if you have a disk 
drive using the MERGE command. Oth- 
erwise, create a screen and then add 
onto your program from there. 



Using the Program 

Type in the program exactly as it is 
listed, making sure to leave out no lines 
or commas in the DATA statements. 
When the title screen comes up, you 
may press ENTER to proceed with the 
program. A new screen then comes up 
asking: 

LOAD AN OLD FILE (Y-'N) ? 

You may press 'Y' if you wish to 
continue working on an old screen. If 
you do, you are asked to enter a file- 
name with: 

ENTER FILENAME: 
which must be less than nine characters 
long. The program next asks: 

FROM (D)ISK OR (T)APE ? 

At this point, you should either have 
your disk in the disk drive or your tape 
in the cassette player with Play pushed. 
Failure to do this might cause an I/O 
Error, especially with disk. 

If you have not chosen to load an old 
file, the screen will next say: 

YOU MUST SELECT A FILENAME. 

ENTER NEW FILENAME: 

This filename is used later when you 
wish to save or analyze the screen you 
create. The next question to answer is: 

(B)LANK SCREEN OR ( A)UTOPRINT? 

Autoprint allows you to enter up to 
four lines of text at a selected color. The 
internal character set in the program is 
used to create your screen. This method 
is not flawless, however, since your text 
cannot be over eight characters long. If 
the characters include M, N, W or X, 
then you may have to use fewer than 
eight characters. 

You may only choose to enter one or 
two lines of text. When the screen says: 

ENTER TEXT: 
enter the words or spaces you wish to 
use. To center a short word such as 
"hello," you may wish to insert one or 



two spaces before the word. A space 
only takes up half the space of a char- 
acter. You will have to experiment to get 
the effect desired. If you enter no text, 
the program will proceed to create your 
screen. Otherwise, you are asked to 
enter four lines of text. 

Next you need to select the color of 
the characters or text to be printed. You 
must select the color with the numbers 
1 to 8. Use this guide: 

1 ) Green 

2) Yellow 

3) Blue 

4) Red 

5) Buff 

6) Aqua 

7) Magenta 

8) Orange 

You may not use a zero or a number 
larger than eight. Use the numbers listed 
above to select the way you want your 
text to look. After the text has been 
created, you will be in the screen editor 
mode. 



Using the Screen Editor 

If you select "blank screen" as your 
option, you will be in the screen editor 
mode. In this mode, you may use the 
arrow keys to draw or create your own 
characters. Here is a summary of the 
functions included: 

Arrow keys — one space at a time 
SHIFT-arrow — moves to that corner 
I to 8 — colors as listed earlier 
9 — return to black cursor 
SHIFT @ — clear the screen 

* — save screen in machine language 

# — analyze and create BASIC file 

When you choose to analyze the 
screen or to save the screen in machine 
language, you are again asked: 

PREPARE (D)ISK DR (T)APE 

At this point, prepare your disk or 
tape and press either 'D' or T*. 

If you have used the autoprint option, 
you will end up in the screen editor 
mode anyway. You may choose to add 
borders or other decorations to enhance 
the screen. Quite often, I will draw thin 
block letters using only the editor since 
most of my titles are over eight charac- 
ters long. In fact, the actual title card for 
this program was created in this fashion 
as was the new text title page for RAIN- 
BOW ON TAPE 1986. 

A few hints are needed here. The 
bottom line of the screen is not included 
in your screen design. It contains a 
summary of your colors and commands 
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so you do not have to refer to this 
article. Also, the program is designed to 
use only a black background, CLS0. 
This is due to the way the CHRS blocks 
are designed with black for the blank 
areas. 

Also, when creating designs, it may 
take a little getting used to switching 
back and forth between a color and '9', 
which is black. With a little practice, 
you will get the hang of it. Remember, 
if you place some colors too close to 
each other, they may overlap. Once 
again, a little practice will help you 
avoid this structural limitation of the 
CoCo screen. 

Other Pointers 

I did try to include the keyboard 
alphanumeric characters in the editor 
mode but found it caused too much 
trouble with overall screen control. 
Therefore, if you must add text to a 
screen, do it using PRINT!? after the 



DATA statements in the BASIC program 
this Title Maker creates. 

Also, keep in mind that if you load 
an old screen filename, that filename 
will be used to write the new file to disk 
or tape. This does not cause a problem 
with the ASCII file or machine lan- 
guage file having the same name, but if 
you are altering an existing machine 
language file, the new one you save will 
overwrite the old. You may avoid this 
simply by using different disks for 
loading and saving, or by using RENAME 
independent of the program. 

You can string a group of these title 
cards together using Disk BASIC'S 
MERGE command. You may also do the 
same with tape by renumbering each 
file, resaving it in ASCII and loading it 
into a tape-based word processor. Be 
sure to use FOR'NEXT delays (i.e., FOR 
1=1 to 2000:NEXT) to keep your 
screens from flipping by too quickly. 
You be the judge of how you want these 



to work. Your only limitation is the 
amount of free memory left. 

One last point should be included 
here. If you wish to have the program 
file written so the DATA statements will 
actually be the ASCII values of the 
CHRS that form the screen images, 
change the value of SW in Line 10 to zero 
(0). SW stands for "short way," which is 
using empty commas to save memory. 

Conclusion 

I hope you find this program useful. 
It did prove to be a bit of a challenge 
putting all these pieces together in a 
user-friendly format. Sure, it could be 
friendlier, but it is still much better than 
working in BASIC fragments or pro- 
gramming from scratch. I do know one 
thing for sure, however! Even I will 
enjoy being able to create titles for 
future "Wishing Well" articles with 
greater ease than 1 have been used to in 
the recent past. 

See you next month. □ 



^i , 125, 120, ,125,124,125 


v \Rr 50 136 520 12 


4>9 DATAXJ0X, XJ0X, XJ0X, , XJ0X, yy , , XJ0X, 


V* 100 60 635 90 


, , 101 , , 96 , , , , 117 , , , , 122 , , , 117 , , , 


180 45 750 212 


117, , ,117,115,114 


285 199 END 234 


45 DATA101, 101, 101, ,101, ,98,101, 


365 56 


96,106,101, ,106, ,, ,117,,,, 122, ,, 


^^^ 




117, , ,117, ,122, 117, ,113 


5j3 DATA100, 1/98,103, ,1)38,108,104, 


The listing: TITLEMKR 108 , 108 , 104 , 108 , 108 , 104 , , 112 , 116 


1 REM ************************ , 124, 124, , 116, 124 , 80,116, 124, 124 


2 REM * THE WISHING WELL * ,112,124,124,120,124,124,124 


3 REM * TITLE MAKER * 55 DATA60 , 60 , 60 , 60 , 60, 60 , 85 , 92 , 9 


4 REM * BY FRED B.SCERBO * 4 , 93 , 85 , 92 , 93 , , 93 , , 86, 88 , 84 , 94 , 9 


5 REM * 60 HARDING AVE. * 2,90,93,92,92,90,60,60,60,60,60, 


6 REM * NORTH ADAMS, MA 01247 * 6 P 


7 REM * COPYRIGHT (C) 1985 * 60 DATA51 , 51 , 51, 51 , 51, 51 , 85 , 80 , 9 


8 REM ************************ 0,85,85,83,87, , 85,86,80, ,, 91,82 , 


10 CLS0:FORI=1TO3 84:READA:PRINTC ,85,83,83,90,51,51,51,51,51,51 


HR$(A+12 8) ; :NEXT:SW=1 65 DATA48 , , , , , , 85 , , , 85 , 85 , , 85 , , 8 


15 DATA14,14,10,13, ,14,4,14,12,1 5 , 84 , 82 , 80, , 90 , , 82 , 85 , , 89 , , , , , , , 


0,, 20, 26,, 30, 20, 30, 21, 28, 29, 20, 2 48 


6,21,24,29,24,29,16,30,21,28,29 70 DATA60 , 60 , 60 , 60 , 60 , 60 , 84 , 48 , , 


20 DATA, 10, ,5,3,10, ,11,2, , , ,26,2 84 , 84 , , 84 , 80 , 92 , 80 , 84 , 88 , 84 , 92 , 9 


6,26, ,26,21,19,19,16,27,23, ,21,, 2,88,92,88,80,88,60,60,60,60,60, 


21,25,26,21,17,19 60 


25 DATA, 10, ,5, ,10, ,10, ,2, , ,26,26 75 PRINT@422," BY FRED B.SCERBO 


,26,, 26, 17, 16, 21,, 26, 21,, 21,, 21, " ; 


,26,21,16,21 80 PRINT@454," COPYRIGHT (C) 198 


30 DATA4, 12, ,12, ,12,4,12,12,8, , , 5 " ; 


28,28,24,20,28,20,28,28,20,24,20 85 IFINKEY$<>CHR$ (13 ) THEN85 


,24,28,24,28,20,28,20,28,28 90 CLS : PRINT§132 , "LOAD AN OLD FI 


35 DATA109, ,101,104,109,108,106, LE (Y/N) ?" 


109,104,96,109,104,16, , ,126,125, 95 X$=INKEY$ : IFX$="Y"THEN100ELSE 


124,122,116,12 6, ,12 6,125,124,122 IFX$="N"THEN125ELSE95 
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X00 PRINT: PRINTTAB (4 ); "ENTER FIL 

E NAME: "; :LINEINPUT G$:IF LEN(G 

$)>8 THEN90 

105 PRINT: PRINTTAB (4) "FROM (D)IS 

K OR (T)APE ?"; 

lip X$=INKEY$ : IFX$="T"THEN115ELS 

EIFX$="D"THEN120ELSE110 

115 CLOADM G$:F$=G$:GOTO530 

120 LOADM G$:F$=G$:GOTO530 

125 CLS:PRINT@130,"YOU MUST SELE 

CT A FILE NAME." 

13/8 PRINT: PRINT" ENTER NEW FILE 

NAME: ";: LINE INPUT F$:IF LEN(F$ 
)>8 THEN 130 

135 PRINT: PRINT" (B)LANK SCREEN 
OR (A)UTOPRINT?" 

140 X$=INKEY$ : IFX$="B"THEN525ELS 
EIFX$="A"THEN145ELSE140 
14 5 CLS:PRINT@231," PLEASE STAND 

BY "; 
150 DIM A(45,9) ,B(4,12) ,K(8) 
155 F0RI=1T08:K(I)=D:D=D+16:NEXT 
I 

160 F0RI=2T011:F0RY=1T09:READ A$ 
:A(I,Y)=ASC(A$)+63:NEXTY,I 
165 F0RI=19T044:F0RY=1T09 
170 READ A$:IFA$=""THEN A(I,Y)=0 
:GOTO180 



XPNDR2 

for the CoCo 
DISK SYSTEM 




XPNDR2 S39.95 each or 2/S76 
This prototype card features a 40 pin 
connector for projects requiring an on- 
line disk system or ROM paks. The 
CoCo signals are brought out to wire- 
wrap pins. Special gold plated spring 
clips provide reliable and noisefree 
disk operation plus solid support for 
vertical mounting of the controller. The 
entire 4.3 -7 inch card is drilled for ICs. 
Assembled, tested and ready to run. 

XPNDR1 S19.95 each or 2/S36 
A rugged 4.3*6.2 inch bare breadboard 
that brings the CoCo signals out to 
labeled pads. Both XPNDR cards are 
double-sided glass/epoxy, have gold 
plated edge connectors, thru-hole 
plating and are designed with heavy 
power and ground buses. They're 
drilled for standard 0.3 and 0.6 inch 
wide dual in-line wirewrap sockets; 
wifh a 0.1 inch grid on the outboard end 
lor connectors. 

SuperGuide S3.95 each 
Here is a unique plastic insert that 
aligns and supports printed circuit 
cards in the CoCo cartridge port. Don't 
forget to ORDER ONE FOR YOUR 
XPNDR CARDS 



Included with each XPNDR card 
are 8 pages of APPLICATION 
NOTES to help you learn about 
chips and how to connect them to 
your CoCo. 



s 



To order or for technical informa- 
tion calf: 

(206) 782-6809 

weekdays 8 a.m. to noon 

We pay shipping on prepaid orders. 
For immediate shipment send 
check, money order or the number 
and expiration date of your VISA or 
MASTERCARD to: 



ROBOTIC 




MICROSYSTEMS 



BOX 30807 SEATTLE, WA 98103 



175 A(I,Y)=ASC(A$)+63 

180 NEXTY,I 

18 5 F0RI=1T04:F0RY=1T012:READ A$ 

:B(I,Y)=ASC(A$)+63:NEXTY,I 

190 CLS: PRINT" FIRST TEXT LINE (8 

CHARACTERS) ." 
195 FORY=lT04 

200 PRINT"ENTER TEXT: ";:LINEINP 
UT W$(Y):IF W$(Y)=""THEN215 
205 PRINT"ENTER COLOR #: " ; : INPU 
TQ(Y) 

210 PRINT :NEXTY 
215 K=32:CLS0 

220 FORII=lTO Y-1:L=K:W$=W$(II) : 
C=K(Q(II) ) :GOSUB2 30:K=K+96:NEXTI 
I 

225 GOTO530 

2 30 P=LEN(W$) :FORZ=lTOP:I=ASC(MI 
D$(W$,Z,l))-46 

235 IFI=31THEN245ELSEIFI=32THEN2 
50ELSEIFI=41THEN255ELSEIFI=42THE 
N2 60ELSEIFI=-14THEN2 65 
240 GOSUB275:GOTO270 
245 I=1:GOSUB300:GOTO270 
250 I=2:GOSUB300:GOTO270 
255 I=3:GOSUB300:GOTO2 70 
260 I=4:GOSUB300:GOTO270 

2 65 L=L+2 

270 NEXT: RETURN 

275 PRINT@0+L,CHR$(A(I,1)+C)CHR$ 

(A(I,2)+C)CHR$(A(I,3)+C) ; 

280 PRINT@32+L,CHR$(A(I,4)+C)CHR 

$(A(I,5)+C)CHR$(A(I,6)+C) ; 

285 PRINT§64+L,CHR$(A(I,7)+C)CHR 

$(A(I,8)+C)CHR$(A(I,9)+C) ; 

290 L=L+4: RETURN 

295 GOT0295 

300 PRINT@0+L,CHR$(B(I,1)+C)CHR$ 

(B(I,2)+C)CHR$(B(I,3)+C)CHR$(B(I 

,4)+C); 

305 PRINT@32+L,CHR$(B(I,5)+C)CHR 

$ ( B ( I , 6 ) +C ) CHR$ ( B ( I , 7 ) +C ) CHR$ ( B ( 

I,8)+C) ; 

310 PRINT@64+L,CHR$(B(I,9)+C)CHR 

$(B(I,10)+C)CHR$(B(I,11)+C)CHR$( 

B ( 1 , 12 ) +C) ; : L=L+5 : RETURN 

315 PRINT@Q,CHR$(154) ;:PRINT@Q+3 

0,CHR$(145)CHR$(128)CHR$(154)CHR 

$(145) ; :PRINT@Q+63,CHR$(153)CHR$ 

(155)CHR$(152) ; : PRINT@Q+9 6 , CHR$ ( 

152) ; : RETURN 

3 20 FORI=1TO1500 

325 IFPEEK(339)=254THEN330ELSEIF 

INKEY$=" "THENNEXT 

3 30 RETURN 

335 DATAH,M,L,P,A,P,E,M,I 

340 DAThB l P,h,h l P l K l E,K l I 

345 DATAO,M,L,D,M,B,M,M,M 
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350 DATAM,M,L,M,M,P,M,M,I 


615 IFH<0THENH=0 


355 DATAP,F, 


K, 


M,N,0, 


A, 


E,I 


620 IFV<0THENV=0 


360 DATAP,M, 


M, 


M,M,P, 


M, 


M,M 


625 IFH>63THENH=63 


365 DATAP,M, 


M, 


P,M,P, 


M, 


M,M 


630 IFV>2 9THENV=29 


370 DATAO,M ; 


P, 


A,H,I, 


E, 


I, A 


635 X=VAL(X$) :IFX<1 OR X>9THEN64 


375 DATAP,M, 


P, 


P,M,P, 


M, 


M,M 


5 


380 DATAP,M, 


P, 


M,M,P, 


M, 


M,M 


640 C=X 


385 DATAH,M, 


L, 


P,M,P, 


M, 


A,M 


645 IFC=9 THEN RESET (H, V) : GOT055 


390 DATAP,M ; 


L/ 


P/M f L, 


M, 


M,I 


5 


395 DATAP,M, 


M, 


P,A,A, 


M, 


M,M 


650 SET(H,V,C) :GOT0555 


400 DATAP,M, 


L, 


P,A,P, 


M, 


M,I 


655 GOSUB680 


405 DATAP,M, 


M, 


P,M,M, 


M, 


M,M 


660 X$=INKEY$ : IFX$="D"THEN670ELS 


410 DATAP,M, 


M, 


P,M,M ( 


M, 


A, A 


EIFX$="T M THEN665ELSE660 


415 DATAP,M 


M 


P,E,P 


M ( 


M,M 


665 CSAVEM F$ , 1024 , 1503 ,0 : GOT053 


420 DATAP,A 


P 


P,M,P 


M 


A,M 





425 DATAE,P 


I 


A,P,A 


E 


M,I 


670 SAVEM F$, 1024, 1503, 0:GOTO530 


430 DATAM,N 





A,F,K 


M 


M,I 


675 GOSUB680:GOTO700 


435 DATAP,B 





P,N,C 


M 


A,M 


680 PRINT@480,STRING$(31,32) ; 


440 DATAP,A 


A 


P,A,A 


M 


M,M 


685 POKE1535,143 


445 DATA, , , 


i 


i i t i i 


/ 


iii 


690 PRINT@48 4,"PREPARE (D)ISK OR 


450 DATAP,M 


P 


P,A,P 


M 


M,M 


(T)APE " ; 


455 DATAP,M 


P 


P,M,M 


M 


A, A 


695 RETURN 


4 60 DATAP,M 


P 


P,B,P 


M 


M,0 


700 X$=INKEY$:IFX$="D"THEN 705EL 


4 65 DATAP,M 


P 


P,N,C 


M 


A,M 


SEIFX$="T ,, THEN710ELSE700 


470 DATAP,M 


M 


M,M,P 


M 


M,M 


705 DV=l:F$=F$+"/BAS" :GOT0715 


475 DATAM,P 


M 


A,P,A 


A 


M,A 


710 DV=-1 


480 DATAP,A 


P 


P,A,P 


M 


M,M 


715 PRINT@480," NOW ANALYSING SC 


485 DATAL,A 


H 


N,D,0 


A 


M,A 


REEN LOCATIONS"; 


490 DATA, , , 


i 


i i i i i 


/ 


i i i 


720 FOR L=1472TO1056STEP-32:ST=0 


495 DATAL,A 


,H 


f E,P,I 


A 


M,A 


725 FORM=L TO L+31 : RS=PEEK(M) : ST 


500 DATAM,M 


,P 


D,M,A 


M 


,M,M 


=ST+RS : NEXTM 


505 DATAP,C 


B 


r P,P,E 


r I 


r P,M,A,A,M 


730 IF ST=4096THEN NEXTL 


510 DATAP,L 


rA 


P,P,E 


,L 


r P,M,A,E,M 


735 REM OPEN FILE 


515 DATAP,A 


r A 


,P,P,G 


r J 


f P,E,I,E,I 


740 OPEN"0",#DV,F$ 


520 DATAN,C 


B 


0,B,G 


J 


C,M,A,A,M 


745 PRINT#DV,"10 CLS0 : FORI=lTO" ; 


525 CLS0 


L- 1024+32;": READ A:"; 


530 R$=CHR$(128) : PRINT@481 , "" ; :F 


750 IF SW=1 THEN 7 60 


0RI=143T0255STEP16 : PRINTCHR$ ( I ) R 


755 PRINT#DV,"PRINTCHR$(A) ; : NEXT 


$ ; : NEXT 


■■:GOT0765 


535 Q=48:FORI=1504TO1520STEP2:Q= 


760 PRINT#DV,"PRINTCHR$(A+12 8) ;: 


Q+l : POKEI , Q : NEXTI : POKEI ,42: PRINT 


NEXT" 


@497,R$; 


765 LN=10:FOR N=1024TO L STEP32 


540 PRINT§499 , "save"R$R$"analys" 


770 LN=LN+10:W$=STR$(LN) :QW=LEN( 


;:POKE1528,35:POKE1535,5 


W$) :W$=RIGHT$(W$,QW-1)+" DATA" : P 


545 A$="PAGE" 


RINT#DV,W$; 


550 C=0:H=0:V=0 


775 FOR M=N TO N+31 :RS=PEEK (M) 


555 X$=INKEY$:IFX$=""THEN555 


780 IF SW=0THEN7 90 


560 IFX$=CHR$(8)THENH=H-1 


785 RS=RS-128 


565 IFX$=CHR$(9)THENH=H+1 


7 90 RS$=STR$(RS) :QW=LEN(RS$) :RS$ 


570 IFX$=CHR$(10)THENV=V+1 


=RIGHT$(RS$,QW-1) : IF RS$="0"THEN 


575 IFX$=CHR$(94)THENV=V-1 


RS$="" 


580 IFX$=CHR$(95)THENV=0 


795 PRINT#DV,RS$; : IF MON+31 THE 


585 IFX$=CHR$(91)THENV=29 


N PRINT#DV,","; 


590 IFX$=CHR$(21)THENH=0 


800 NEXTM: PRINT#DV,"":NEXTN 


595 IFX$=CHR$(93)THENH=63 


805 PRINT #DV, "1000 GOTO1000" 


600 IFX$="*"THEN655 


810 PRINT§480, STRING? (31, 32) ; 


605 IFX$="#"THEN675 


815 CLOSE#DV 


610 IFX$=CHR$(19)THEN52 5 


820 GOTO530 /^\ 



March 1986 THE RAINBOW 



161 




You cao *■< 0«njl" tuRGt 
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CO CO CROSSWORDS 

Attention all crossword puzzle addicts! 
Now you can solve them on you' color 
computer! Master set contains 27 puzzles 
with (our levels of difficulty A pull-down 
menu includes such features as SAVE, 
HELP. WORD or LETTER GIVEN, and CHEAT 
Additional sets, also available 30-plus 
puzzles on each sei 

REQUIRES 32K DISK 

MASTER SCT S24.95 
EACH ADDITIONAL SCT $12.95 
SETS «2, IKS flHI) #4 NOW nvniLflflLf.. 

BRCWMRSTCR 

Move along the end of the bars 
serving beer to your thirsty customers. 
Watch for falling glasses and rowdy 
customers Loads of fun 

REQUIRES 32K Gl JOYSTICK 
TAPE $14.95 
DISK $17.95 



BLRCKBCRRD'S ISLRND 

A brand new high res graphic 
adventure. This one will blow your socks 
off! Wander around Blackbeard's Island 
being ever mindful of fhe hazards 
while your lust builds for Blackbeard's 
buried treasure T'aint easy, mateyl 

REQUIRES 32K DISK ONLV 
DISH $19.95 

SKVUJRV 

Maneuver your sky cralt along the 
skyway avoiding enemy craft, mines and 
sky bugs! Jump over holes bul don't run 
off fhe edge. We challenge anyone to 
make It through all 99 levels! 

REQUIRES 32K Si JOYSTICK 

TAPE $19.95 

DISK $22.95 

MONCVOPOLV 

Nowi Play this popular board game on 
your computer. Probably Ihe mosl 
realistic computer board game 
simulation ever. Contains all the 
features of the original. Buy. rent or sell 
properties and become a wealthy 
land baron with this program. 

REQUIRES 32K 6t JOYSTICK 

TAPE $19.95 

DISK $22.95 



iaac 




s 


S3 — 


of 


1 






pc-JC- WMBW 




SCORE i HCH 03 LEVEL 01] 






pick 3 am I 
eeon tuo 


::: 






's*»* 1 




I 

TH€ MARTIAN CRVPT 

All new graphic adventure — Man 
discovers thai life once existed on Mors 
Can you find the hidden Martian Crypt? 
Wifh sound effects to over 30 screens of 
animated high res graphics 

REQUIRES 32K MACHINE 
TAPE $18.95 
DISK $21.95 

GOLD RUNNCR 

Travel 'he maze, in your never ending 
search for GOLD. But be careful' There 
are hidden trap doors, burly guards, 
tricky ladders & slippery ropes. Sounds 
eosy you say? Clear the 1st screen and 
32 more await you 1 

REQUIRES 64K MACHINE 
JOYSTICK OA KEYBOARD 

TAPE $14.95 

DISK $17.95 

TH€ MISRDVCNTURC-S 
OF CDDIC 

Another great graphic adventure!! This 
time you are exploring an old mine shall 
when you stumble upon an old man — 
and into a different lime! His rebellious 
son Eddie is roaming around time 
creating havoc and you must bring him 
home in order 'o return to your own 
time. Visit fhe apple orchard of Isaac 
Newton, the doomed Titanic — over 1/10 
different locations and 50-ptus 
commands! All in hi-res graphics. Only 
for the very odventurous and those who 
'enjoy being frustrated"! 

REQUIRES 64K 
TAPE $18.95 
DISK $21.95 

V€GRS GAM€ PRK 

Have you ever wanted to bring Las 
Vegas home with you? Now you can! 
Six different games in this package: 
Blackjack. Keno, Poker, plus three other 
slot machine lookallkes. The only thing 
missing is the voice of Wayne Newton! 

REQUIRES 16K EXT. BASIC JT 
TAPE $24.95 b ** 
DISK $27.95 

COLOR CAR 

You asked for if and now here It Is! 
Fast-moving Grand Prix style racing 
With your computer sit at the wheel of 
your racer through the difficult 
racecourse "Bump & Jump" other cars, 
but be carelul because they'll return the 
favor! 

REQUIRES 64K & JOYSTICK 

TAPE $19.95 

DISK $22.95 



•Add S2.00 shipping & handling 



Phone Orders (616) 957-0444 

4285 Bradford N.E. 

Grand Rapids, Ml 49506 



We have more software available than 
listed. Write tor our free catalog. 

NO D6M.CRS PL€flS€ 



The Joy$ 
of Early Amortization 



Paying off a mortgage early to get 
a quicker equity buildup is the 
best idea I (a homeowner) have 
heard of in a long time. It used to cost 
a little extra each month to reach this 
goal, but a new kind of mortgage is just 
now taking hold in the United States 
that can make the process almost pain- 
less. Quicker mortgage payoff will save 
you a fortune in interest rates and can 
take years off the repayment schedule. 
It also has two strategic uses. 

A young couple who pays off their 
mortgage early will then have a huge 
amount of equity on tap. This is also a 
method of forced savings; all of these 
gains are tax deferred. A quick payment 
mortgage is also suitable for middle- 
aged home buyers who want to own 
their home free and clear by the time 
they retire. The new way to faster home 
ownership is through a bi-weekly mort- 
gage payment plan. The loan is amor- 
tized as if it were going to last for 30 
years, but instead of paying once a 
month, one half the payment is made 
every two weeks. This method of repay- 
ment leads to the equivalent of 13 
monthly payments rather than the usual 
12. This may not sound like it would 
make a lot of difference, but the amount 
of money and time saved is astounding, 
as you will see when comparing Option 
1 with Option 2. Since this method of 
repayment is not available with all 
lenders, two other options are included 
that can have the same effect and are 
accepted by most lenders. 

Edward R. Carson is a head operator 
at the Timken Company in Columbus, 
Ohio. His interests encompass compu- 
ters and baseball. He is married and has 
three sons. 



There are two parts to the Mortgage 
Planner. The first part is a loan calcu- 
lator. If you are planning a home pur- 
chase, the calculator figures your prin- 
cipal and interest payments. It returns 
the amount financed, amount of pay- 
ment, interest rate and number of 
months required to retire the loan (see 
Figure 1). If you know the amount you 
want to pay per month but don't know 
the amount you can finance to arrive at 
your target payment, the calculator can 
help. When asked the amount to fi- 
nance, just press ENTER; you are then 
asked the amount per month (enter 
what you want to pay per month) and 
the calculator gives the amount to 
finance and arrives at your target pay- 
ment. You can go through as many 



By Edward R. Carson 

calculations as you wish. The last 
amount calculated is automatically 
forwarded to the Mortgage Planner. It 
is not necessary to go to the calculator. 
If you have an existing mortgage, go 
directly to the Planner. 

The Mortgage Planner has four op- 
tions to choose from. Each is a different 
method of repayment. Three of these 
options can save thousands of dollars 
and many years off the mortgage. The 



Figure 1 




AMOUNT OF THE LOAN 


$ 3 6000.00 


NO. OF MONTHS 


360 


INTEREST RATE 


10 % 


MONTHLY PAYMENTS 


S 315.93 









Option 1 






YEAR IHT.PAID 


PRINCIPAL PAID 






1 


s 


359P.17 


S 


200.94 




/ 


2 


s 


7159.30 


S 


422.92 




/ 


3 


5 


10705.20 


$ 


668.13 






4 


S 


14225.42 


s 


939.02 




/ 


5 


s 


17717.28 


5 


1238.26 






6 


s 


21177.82 


5 


1568.84 






7 


s 


24603.75 


5 


1934.02 




/ 


5 


s 


27991.44 


5 


2337.43 




/ 


9 


s 


31336.91 


S 


2783.07 






10 


s 


34635.72 


S 


3275.37 




/ 


11 


s 


37882.99 


S 


3819.21 




/ 


12 


5 


41073.33 


s 


4419.98 




/ 


13 


S 


44200.78 


s 


5083.64 




/ 


14 


5 


47258.75 


s 


5816.73 




/ 


15 


S 


50239.96 


S 


6626.68 






16 


$ 


53136.39 


s 


7521.36 




/ 


17 


s 


55939.15 


s 


8509.70 




/ 


18 


s 


58638.45 


s 


9601.51 






19 


s 


61223.45 


$ 


10807.63 




/ 


20 


s 


63682.17 


5 


12140.01 






21 


s 


66301.42 


5 


13611.88 






22 


s 


68166.57 


5 


15237.83 




/ 


23 


5 


70161.51 


$ 


17034.00 




/ 


24 


S 


71968.40 


S 


19018.22 




/ 


25 


S 


73567.57 


S 


21210.16 






26 


S 


74937.27 


5 


23631.57 






27 


S 


76053.47 


S 


26306.48 




/ 


28 


s 


76889.64 


S 


29261.42 




/ 


29 


5 


77416.46 


s 


32525.71 




/ 




YEARS 




TOTAL INTEREST 




TOTAL 


PRINCIPAL 




3P.0 




S 77733.28 




S 3 6000.00 
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Option 2 




YEAR 


INT. PAID 


PRINCIPAL PAID 




1 


s 


3564.58 


S 


542.46 


/ 


2 


s 


7072.38 


S 


1141.69 


/ 


3 


s 


10517.47 


S 


1803.63 


/ 


4 


s 


13893.28 


s 


2534.85 




5 


s 


17192.57 


s 


3342.60 


/ 


6 


s 


20407.32 


s 


4234.89 




7 


s 


23528.68 


s 


5220.56 


/ 


8 


s 


26546.89 


s 


6309.39 


/ 


9 


s 


29451.14 


s 


7512.17 




If 


s 


32229.51 


s 


8840.84 


/ 


11 


s 


34868.83 


s 


10308.55 




12 


s 


37354.54 


s 


11929. 88 


/ 


13 


5 


39670.57 


s 


13720.89 




14 


s 


41799.15 


s 


15699.34 


/ 


15 


s 


43720.67 


s 


17884.85 


/ 


16 


5 


45413.47 


s 


20299.09 


/ 


17 


S 


46853.60 


s 


22966.00 


/ 


IS 


S 


48014.61 


s 


25912.02 


/ 


19 


s 


48867.30 


? 


29166.36 


/ 


20 


5 


49379.40 


s 


32761.30 


/ 


YEARS 




TOTAL INTEREST 




TOTAL PRINCIPAL 




22.6 




j 49615.88 




S 3 6000.00 





choice of on-screen or printer displays 
is given. The printer routine gives a 
year-by-year printout of interest paid, 
principal, paid outstanding balance, 
total payments, and years and months 
required to retire the loan. There is an 
on-screen bar graph of interest paid at 
all options. Any calculated screen can 
also be dumped to the printer by press- 
ing the 'P' key. 1 found this easier than 
writing down all the information on a 
scratch pad. The amount of money that 
can be saved with just a little extra each 
month literally amazes me, as I am sure 
it will you. 

(Any questions you have about Mort- 
gage Planner may be directed to Mr. 
Carson at 7600 Condit Road, Center- 
burg, OH 43011, phone 614-625-6936. 
Please include an SASE when writ- 
ing.) D 





^ 








TO CONTINUE" 
L. 101 K$=INKEY$:IFK$=""THEN 101ELS 
E106 


«\i 


//W... 


..218 


1001 
1061 . 


207 

5 


V 


' 191 ... 


..141 




301 ... 


...62 


1111 .. 


...120 


106 CLS: PRINT" 1) CONTINUE TO MAK 




391 
496 .. . 


7 
..209 


1151 
1246 .. 


105 
...206 


E NORMAL MONTHLY PAYMENTS 
ii 




556 

666 .. . 


.. .,1 
..139 


1341 
1441 .. 


22 
...197 


111 PRINT: PRINT" 2) MAKE 1/2 OF N 




771 ... 


...54 


1481 .. 


...136 


ORMAL PAYMENT EVERY 14 DAYS. 




821 ... 


..231 


1571 .. 


...240 


t ii 




921 


..242 


END . 


83 


116 PRINT: PRINT" 3) LUMP SUM (IN 
EXCESS OF NORMAL PAYMENTS ONPF 




















EACH YEAR. . ." 


The listing: MORTGAGE 








121 PRINT: PRINT" 4) INCREASE MONT 
HLY PAYMENT BY (X) AMOUNT... (X 


1 Y=l 








) AMOUNT USED TO REDUCE BALANCE 


6 CLS 








ON A MONTHLY BASIS" 


11 X=32 








12 6 PRINT"HIT ANY KEY TO CONTINU 


16 CLS 








E" 


21 Z$="SAVE" 








131 K$=INKEY$:IFK$=""THEN 131ELS 


26 PRINT@X,Z$ 








E 136 


31 X=X+10 








136 CLS :PRINT@75, "options" 


3 6 IFX=382 THEN 41 ELSE 2€ 




141 PRINT :PRINTTAB( 10) "1 2 3 


41 FORT=1TO80 : NEXTT 






4" 


46 Y=Y+1:IFY=5THEN51ELSE6 




146 PRINT :PRINTTAB( 10) "select on 


51 FORT=1TO500: NEXTT 






e" 


56 CLS -.PRINTS 164, 


"the 


mortgage 


p 151 PRINTSTRING$(32,"*") 


lanner" 








156 PRINT" 1= NORMAL PAYMENT" 


61 PRINT© 2 3 6, "by" 








161 PRINT: PRINT "2= 1/2 NORMAL PA 


66 PRINT@294,"edward 


r carson" 


YMENT" 


71 GOSUB1181 








166 PRINT: PRINT" 3= LUMP SUM" 


76 GOTO1021 








171 PRINT: PRINT"4= EXCESS MONTHL 


81 CLS 








Y" 


86 PRINT : PRINT : PRINT 


"YOU 


HAVE 


F 176 INPUT S 


OUR OPTIONS WITH 


THIS 


PORTION OF 181 ON S GOTO 231,546,821,841 


THE PROGRAM. . . " 








186 CLS:PRINT@195, "what is your 


91 PRINT:PRINTTAB(7) " 


THEY 


ARE AS normal " 


FOLLOWS . . " 
96 PRINT: PRINT: PRINT" 


HIT ANY KE 


191 PRINT@2 63, "monthly payment.. 
Y . .» 
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196 INPUT NP 


296 CB=CB-P 


201 CLS : PRINTS 19 3 , "what is your 


301 TP=TP+NP+EP 


interest rate. ..." 


306 TI(S)=TI(S)+IN 


2j36 PRINT§258, "input as per exam 


311 CB=CB-EP 


pie <.,0950 >" 


316 IF CB<=0THEN3 2 6ELSE321 


211 INPUT AI 


321 IFZ=M THEN831ELSEZ=Z+l:GOT02 


216 CLS:PRINT§192 / "what is your 


81 


current balance.." 


326 TI(S)=TI(S)-CB:PB=PB+CB 


221 INPUT CB 


331 CLS :PRINTTAB( 12) "OPTION » ;S 


226 GOTO 81 


336 PRINT: PRINT "INTEREST PAID";: 


231 CLS:PRINT@2 60,"DO YOU WANT A 


PRINTTAB (21);: PRINTUS ING "$###### 


PRINTOUT OF ... " 


•##";TI(S) 


236 PRINTS 3 2 4, "YEARLY ANALYSIS.. 


341 PRINT" PRINCIPAL PAID" ;: PRINT 


ii 


TAB(21) ;:PRINTUSING"$######.##"; 


241 PRINT :PRINTTAB( 11)" ( Y/N )" 


PB 


246 K$=INKEY$:IFK$=""THEN246 


346 PRINTTAB(21)STRING$(10,"-") 


251 IFK$="Y"THEN 421ELSEIFK$="N" 


351 PRINT"TOTAL PAID" ;: PRINTTAB ( 


THEN256 


21) ;:PRINTUSING"$######.##";TP 


256 CLS: PRINTS 19 6, "calculating t 


356 Z=Z/12 


otals. . . " 


361 PRINT: PRINT "YEARS TO RETIRE 


261 PRINTS260, "please stand by.. 


LOAN . . " ; : PRINTUS ING" ##.#"; Z 


ii 


3 66 PRINT"NORMAL PAYMENT 


266 POKE 65495, 


";:PRINTUSING"$####.##" ;NP 


271 DP=3p.41:Z=l 


371 PRINT" INTEREST RATE 


276 DI=AI/365 


";AI;"%" 


281 IN=DI*CB*DP 


376 IFS=3GOSUB1426ELSEIFS=4GOSUB 


286 P=NP-IN 


1431 


291 PB=PB+P+EP 


381 POKE 65494,0 



THE ANYONE-CAN-USE 



HALLEYS * COMET 




A ONCE-IN-A-LIFETIME EVENT! 

THIS VERY FRIENDLY SOFTWARE PACKAGE 

includes: 

• Complete day by day Halley's Comet Positions on 
7 High Resolution Star Charts from Nov., 1985 to 
June, 1986. Includes a graphics screen DUMP to 
take hard copy outside with you. 

• Documented by a 50+ page USER GUIDE with 
easy instructions for using each star chart, general 
information on the night sky, comet information 
and photographing the comet. 

ON DISC FOR: COLOR COMPUTER, IBM PC 

order from: 

CELMARK <tOA Eft 

P.O. BOX 4493 «{>OHr-.OU 

MIAMI, FL 33269 + $2.00 ship. 

Fla. residents add 5% sales lax. Canadian add 6%. Foreign add 15% 




BUSINESS SOFTWARE 

$ PORTFOLIO $ 

BUSINESS DATABASE SYSTEMS 



* Reviewed In HOT CoCo Dec. 1984 & RAINBOW Feb. 1985 * 

• DATABASE MANAGEMENT - deline, reorganized & update a dalabase 

• SPREAD SHEET - calculations lo updale database 

• REPORT MODULE - customized report formats with headings & tolals 

• WORD PROCESSOR - merge database with custom letters, labels. & reports 

• MACRO PROCEDURES - slore any report calculations with sorts 6 selections 
■ UTILITIES - gererate. merge, summarize, & summarizepos! 

• 216 PAGE MANUAL WITH STEP-BY-STEP TUTORIAL 

• WORKBASE I (600 Records) $-1995 - WORKBASE II (1200 Records) $59.95 

BUSINESS APPLICATION PACKAGES 



i READYTO-USE - 50-page manual, database, calculations. & reports 

< SELF-CONTAINED - purchase & use any package independently 

i BUILT-IN DATABASE FUNCTIONS - selectively display/print records 

' COMPREHENSIVE - all mapr accounting lunctions addressed 

i EASY TO USE - all packages are entirely menu driven 

■ EXPANDABLE - use any application database with WORKBASE DATABASE 

i PROVEN - currently used in businesses, churches, and accounting lirms 

' COST EFFECTIVE - $2995 per package - $24.95 when 2 or more purchased 



* INVENTORY CONTROL 

* SALES ORDER ENTRY 

* ACCOUNTS PAYABLE 

* PAYROLL 

* RENTAL PROPERTY 

ALL SOFTWARE REOU IRES 32KI64K TRS-80 CoCo & 1 DISK DRIVE 
* FREE CATALOG AVAILABLE * 



ACCOUNTS RECEIVABLE 
GENERAL LEDGER 
PURCHASE ORDER ENTRY 
CHURCH MEMBERSHIP 



ORDERING: CHECK, MONEY ORDER, 

COD, MASTERCARD, VISA 

Price Includes shipping In USA 

NC residents add 4.5% sales tax 



WORKBASE DATA SYSTEMS 

P.O. Box 3448 

Durham, NC 27702 

Call Toll Free 1 -800-334-0854 ext 887 

(919) 286-3445 NC Residents only 
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386 C$=INKEY$:IFC$=""THEN386 


551 PRINT@324, "YEARLY ANALYSIS.. 


391 IFC$="P"THENGOSUB 1381ELSE 3 


it 

• 


96 


556 PRINT: PRINTTAB (11) " ( Y/N )" 


396 IF S=4 THEN GOSUB 1246 '.GOTO 


561 K$=INKEY$:IF K$=""THEN561 


401 


566 IFK$="Y"THEN716ELSEIFK$="N"T 


40 1 CB=PB : PB=0 : Z=0 : TB=0 : TP=0 : LS= 


HEN581 


: EP=0 


571 ' ' 


4j36 PRINT: PRINT "DO YOU WANT THIS 


576 ' ' 


OPTION AGAIN" 


581 CLS:NP=NP/2:DP=14:Z=1:H=26:Y 


411 PRINTTAB(12) "( Y/N )": INPUT 


=1 


C$:IFC$="N"THEN 136 ELSE 416 


586 POKE65495,0 


416 TI(S)=0:GOTO 136 


591 PRINT@196, "calculating total 


421 CLS:PRINT@2 64,"now printing" 


c II 

• • • 


426 PRINT#-2, TAB (30) "OPTION " ;S 


596 PRINT@260, "please stand by.. 


431 IFS=3GOSUB851 


II 

• 


436 IFS=4GOSUB856 


601 DI=AI/3 65 


441 PRINT#-2,"YEAR";TAB(6)"INT.P 


606 IN=DI*CB*DP 


AID"; TAB (18) "PRINCIPAL PAID"; TAB 


611 P=NP-IN 


(35)" TOTAL PAYMENT " ; TAB ( 5 1 ) " OUTS 


616 PB=PB+P 


TANDING BALANCE" 


621 CB=CB-P 


446 DP=30.41:Z=1:H=12:Y=1 


626 TP=TP+NP 


451 DI=AI/365 


631 TI(S)=TI(S)+IN 


456 IN=DI*CB*DP 


636 IFCB<=0THEN646ELSE641 


461 P=NP-IN 


641 Z=Z+1:GOTO606 


466 PB=PB+P+EP 


646 TI(S)=TI(S)-CB:PB=PB+CB 


471 CB=CB-P 


651 CLS: PRINTTAB (11) "OPTION ";S 


476 TP=TP+NP+EP 


656 PRINT: PRINT" INTEREST PAID";: 


481 TI(S)=TI(S)+IN 


PRINTTAB (21) ;: PRINTUSING" $###### 


486 CB=CB-EP 


.##";TI(S) 


491 IFCB<=0THEN511ELSE496 


661 PRINT"PRINCIPAL PAID";: PRINT 


496 IFZ=H THEN83 6ELSEZ=Z+l:GOT04 

56 

501 IFCB<0THENCB=0 


TAB(21) ;:PRINTUSING"$######.##"; 

PB 

666 PRINTTAB ( 2 1)STRING$( 10,"-") 


506 PRINT#-2,Y;:PRINT#-2,TAB(6) ; 


671 PRINT"TOTAL PAID" ;: PRINTTAB ( 


:PRINT#-2,USING"$######.##";TI(S 


21) ;:PRINTUSING"$######.##»;TP 


) ;:PRINT#-2,TAB(18) ; : PRINT#-2 ,US 


676 Z=Z/24 


ING"$######.##";PB;:PRINT#-2,TAB 


681 PRINT: PRINT "YEARS TO RETIRE 


(35) ;:PRINT#-2,USING"$######.##" 


LOAN . . " ; : PRINTUSING" ##.#"; Z 


;TP;:PRINT#-2,TAB(51) ;:PRINT#-2, 


686 PRINT"l/2 NORMAL PAYMENT.... 


USING" $######.##";CB:Y=Y+1:H=H+1 


.";: PRINTUSING" $###.##";NP 


2:GOT0456 

511 TI(S)=TI(S)-CB:PB=PB+CB 


691 PRINT" INTEREST RATE 


";AI;"%" 


516 PRINT#-2,"" 


696 POKE65494,0 


521 PRINT#-2,TAB(5) "YEARS" ; TAB (1 


701 C$=INKEY$:IFC$=""THEN 701 


2) "TOTAL INTEREST"; TAB (28) "TOTAL 


706 IFC$="P"THEN GOSUB 1381 ELSE 


PRINCIPAL"; TAB (45) "TOTAL PAYMEN 


711 


TS" 


711 NP=NP*2 : TP=0 : TI=0 : CB=PB: PB=0 


526 PRINT#-2,"" 


:GOTO 13 6 


531 Z=Z/12 


716 CLS:PRINT@2 64, "NOW PRINTING" 


536 PRINT#-2,TAB(5) : PRINT#-2 ,USI 


721 PRINT#-2,TAB(30) "OPTION" ;S 


NG"##.#";Z;:PRINT#-2,TAB(12) ;:PR 


72 6 PRINT#-2,"YEAR";TAB(6) "INT.P 


INT#-2,USING"$######.##";TI(S);: 


AID"; TAB (18) "PRINCIPAL PAID"; TAB 


PRINT#-2,TAB(28) ; : PRINT#-2 , USING 


(35)" TOTAL PAYMENTS " ; TAB ( 5 1 ) " OUT 


"$######. ##";PB;:PRINT#-2, TAB (45 


STANDING BALANCE" 


) ;:PRINT#-2,USING"$######.##";TP 


731 NP=NP/2:DP=14:Z=1:H=2 6:Y=1 


541 CB=PB:TP=0:TI=0:PB=0:EP=0:LS 


736 DI=AI/365 


=0:GOTO 136 


741 IN=DI*CB*DP 


546 CLS:PRINT@2 60, "DO YOU WANT A 


74 6 P=NP-IN 


PRINTOUT OF. . ." 


751 PB=PB+P 
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756 CB=CB-P 

761 TP=TP+NP 

766 TI(S)=TI(S)+IN 

771 IF CB<=)3THEN 786ELSE776 

776 IFZ-H=0THEN781ELSEZ=Z+1:GOTO 

741 

781 PRINT#-2,Y;:PRINT#-2,TAB(6) ; 
:PRINT#-2,USING"$######.##»;TI(S 
) ;:PRINT#-2,TAB(18) ; : PRINT#-2 ,US 
ING"$######.##";PB;:PRINT#-2,TAB 
(35);:PRINT#-2,USING»$######.##" 
?TP;:PRINT#-2,TAB(51) ;:PRINT#-2, 
USING"$######.##";CB:Y=Y+1:Z=Z+1 
:H=H+26:GOTO 741 
786 TI(S)=TI(S)-CB:PB=PB+CB 
791 PRINT#-2 , ••" : PRINT#-2 , "YEARS" 
; TAB ( 7 ) " TOTAL INTEREST " ; TAB (23)" 
TOTAL PRINCI PAL"; TAB (4)3) "TOTAL P 
AYMENTS" 
796 Z=Z/24 

8)31 PRINT#-2 , " " : PRINT#-2 , USING" # 
# . #" ; Z ; : PRINT#-2 , TAB (7 ) ; : PRINT#- 
2,USING"$######.##";TI(S) ;: PRINT 
#-2,TAB(23) ; :PRINT#-2,USING"$### 
###.##";PB; :PRINT#-2,TAB(4j3) ; : PR 
INT#-2,USING»$######.##";TP 
8)36 NP=NP*2:CB=PB:TP=)3:TI=)3:PB=)3 
811 PRINT"HIT ANY KEY TO CONTINU 
E" 

816 K$=INKEY$:IFK$=""THEN816ELSE 
136 

821 CLS:PRINT@195,"amount of lum 
p sum payment" :M= 12 

82 6 INPUT LS:GOT02 31 

8 31 TP=TP+LS : CB=CB-LS : PB=PB+LS : Z 
=Z+l:M=M+12:GOT0281 

83 6 CB=CB-LS:PB=PB+LS:TP=TP+LS:Z 
=Z+l:M=M+12:GOTO 5)31 

841 CLS: PRINT@192,"amount of ex 
cess payment": INPUT EP 
846 GOTO 231 

851 PRINT#-2,TAB(25) "LUMP SUM AM 
OUNT ";:PRINT#-2,USING"$####,##" 
;LS: RETURN 

856 PRINT #-2, TAB (22) "AMOUNT OF E 
XCESS PAYMENT " ; : PRINT#-2 , USING" 
$####. ##";EP:RETURN 
861 CLS:PRINT@164,"how much will 
you finance" : INPUTPV 
866 CLS : PRINT @ 16 4, "how many mont 
hs":INPUTM 

871 CLS :PRINT@163, "what is the i 
nterest rate" : INPUTK 
876 IFK<1THEN GOTO 951 
881 K=K/ 12 :K=K/ 1)3)3 
886 C=(l+K) A M:C=C-1 
891 D=(K+1) A M:D=D*K 
896 C=C/D 
9)31 IFPV=,0THENGOTO9 56 



9)36 A=PV/C 

911 K=K* 12 :K=K* 1)3)3 

916 CLS: PRINT© 9 6, "AMOUNT OF THE 

LO AN" :PRINT@118, USING" $######.## 

";PV 

921 PRINT§162,"NO. OF MONTHS": PR 

INT@183,M 

92 6 PRINT@226, "INTEREST RATE" : PR 

INT@246,K;"%" 

931 PRINT@ 2 9)3, "MONTHLY PAYMENTS" 

:PRINT@3p9,USING"$####.##»;A 

936 S$=INKEY$:IFS$=""THEN936 

941 IF S$="P"THENGOSUB 1381 ELSE 

996 
946 GOTO 996 

951 CLS:PRINT@2 28,"PLEASE STATE 
INTEREST RATE AS A VALUE GR 
EATER THAN 1" : INPUTK: GOT08 81 
956 CLS :PRINT@162, "what are the 
monthly payments" :INPUTA 
961 PV=A*C:GOTO 911 
966 GOSUB 1381 
971 PRINT#-2,"" 

976 PRINT#-2,"AMOUNT OF LOAN";:P 
RINT#-2,USING"$######.##»;PV 
981 PRINT#-2 , "MONTHS REQUIRED TO 

RETIRE LOAN" ; : PRINT#-2 ,M 

986 PRINT#-2, "INTEREST RATE";K;: 

PRINT#-2,"%" 

991 PRINT # -2 , "MONTHLY PAYMENTS"; 

:PRINT#-2,USING"$####.##";A 

996 CLS: PRINT@ 2 2 4," DO YOU WANT A 

NOTHER CALCULATION" 

IfSJai PRINTTAB(11)"(Y/N)" 

Ij3p6 S$=INKEY$:IFS$=""THENlp^6 

1)311 IFS$="Y" THEN 861 ELSE 1)316 

1)316 CB=PV:K=K/ 1)3)3 :AI=K:NP=A: GOT 

81 

1)321 CLS : PRINT @ 16 4, "DO YOU WANT 

INSTRUCTIONS" : PRINT@2£5 , " ( Y/N ) 
ii 

1)326 K$=INKEY$:IFK$=""THEN 1)326 

1)331 IF K$="Y"THEN 1441 ELSE 115 

6 

1^36 CLS:PRINT"IF YOU ARE PLANNI 

NG A HOME PURCHASE. .THE LOA 

N CALCULATOR CAN DETERMINE YOU 

R MONTHLY PAYMENTS ... IF YOU 

KNOW WHAT YOU CAN AFFORD PER MO 
NTH, BUT DONT KNOW THE AMOUNT Y 
OU CAN FINANCE TO ARRIVE AT THIS 

PAYMENT " 

1)341 PRINT"THEN loan calculator 

CAN HELP. ." 

1)34 6 PRINT: PRINT"HIT ANY KEY TO 

CONTINUE" 

1)351 K$=INKEY$:IFK$=""THEN1)351EL 

SE 1)356 

1)356 CLS: PRINT "WHEN YOU ARE ASKE 
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D HOW MUCH YOU WILL FINANCE. . . JU 
ST HIT <ENTER> YOU WILL THEN BE 
ASKED THE AMOUNT OF MONTHLY 

PAYMENT . ENTER WHAT YOU WANT TO 
PAY PER MONTH. THE PROGRAM WILL 
THEN RETURN THEAMOUNT YOU CAN FI 
NANCE TO GIVE 

1/961 PRINT "YOU THE PAYMENTS YOU 
WANT" 

1/366 PRINT: PRINT :PRINT"HIT ANY K 
EY TO CONTINUE" 

1071 K$=INKEY$:IFK$=""THEN1071EL 
SE 1076 
1076 CLS:PRINT"AFTER FINDING OUT 

THE AMOUNT YOUCAN FINANCE. RUN 
THE" 

1081 PRINTTAB (7) "mortgage saving 
s" 

1086 PRINT "PORTION OF THIS PROGR 
AM." 

1091 PRINT"IT WILL SHOW THREE WA 
YS YOU CAN SAVE THOUSANDS OF DOL 
LARS AND MANY YEARS OFF YOUR M 
ORTGAGE . " 
1096 PRINT "YOU CAN HAVE A YEARLY 

PRINTOUT OF ANY OR ALL OPTIONS 
.IT WILL SHOW, BY YEAR, INTEREST 

PAID, TOTAL PAYMENT , CURRENT BALA 
NCE AND YEARS PAID. IT WILL T 
HEN GIVE TOTALS OF ALL ITEMS. 
1101 PRINT :PRINT"HIT ANY KEY TO 
CONTINUE" 

1106 K$=INKEY$:IFK$=""THEN 1106E 
LSE 1111 

1111 CLS: PRINT" IN ORDER TO SEE A 
N ON SCREEN COMPARISON OF INT 
EREST PAID ON ALL OPTIONS, Y 
OU MUST RUN OPTION 4 LAST." 
1116 PRINT: PRINT "WHEN THERE IS N 
CURSOR ON A CALCULATED SCRE 
EN YOU CAN GET A PRINTOUT BY PRE 
SSING THE LETTER p ANY OTHER KEY 

WILL CONTINUE THE PROGRAM" 
1121 PRINT :PRINT"HIT ANY KEY TO 
CONTINUE" 

1126 K$=INKEY$:IFK$=""THEN1126EL 
SE1131 
1131 CLS: PRINT" THE AMOUNTS GIVEN 

IN THIS PROGRAM SHOULD NO 
T BE CONSTRUED TO BE EXACT AMOUN 

TS YOU WILL PAYOR SAVE BUT 

SHOULD BE USED ONLY AS A GUIDE T 
REPRESENT YOUR PAYMENTS AND 

SAVINGS" 
113 6 PRINT"OPTION 2 OF THIS PROG 
RAM MAY NOTBE ACCEPTABLE TO YOUR 

LENDER PLEASE CHECK WITH THE 
M BEFORE ATTEMPTING THIS METHO 
D. 



1141 PRINT" IF YOU ARE CONSIDERIN 

G A HOME PURCHASE THIS IS AN A 

TTRACTIVE WAY TO SET UP YOUR LO 

AN PAYOFF AS YOU WILL SEE. 

1146 PRINT"HIT ANY KEY TO CONTIN 

UE" 

1151 K$=INKEY$:IFK$=""THEN1151EL 

SE1156 

1156 CLS:PRINT"DO YOU WANT TO GO 

TO THE LOAN CALCULATOR OR TO 
MORTGAGE PLANNER" 
1161 PRINT: PRINT "IF YOU CHOOSE T 
HE CALCULATOR PORTION OF THE 
PROGRAM THE LAST AMOUNTS US 
ED WILL BE AUTO- MATICALLY BE EN 
TERED INTO THE MORTGAGE PLANNE 
R" 

1166 PRINT: PRINT"PRESS <C> FOR C 
ALCULATOR AND <M> FOR MORTGAGE P 
LANNER" 

1171 S$=INKEY$: IFS$= ,MI THEN 1171 
1176 IF S$="C"THEN 861 ELSE 186 
1181 FORL=1024TO1055 
1186 POKEL,191:NEXTL 
1191 L=1056 
1196 POKEL,191 
1201 L=L+32 

1206 IFL=1504+32THEN1211ELSE1196 
1211 FORL=1504TO1535 
1216 POKEL,191:NEXTL 
1221 L=1535 
1226 POKEL,191 
1231 L=L-32 

1236 IFL=1055 THEN1241ELSE 1226 
1241 FORT=1TO700*2:NEXTT: RETURN 
1246 CLS:PRINT"DO YOU WANT TO CO 
MPARE INTEREST ON ALL FOUR OPTIO 
NS" 

1251 PRINT: PRINTTAB (11)" (Y/N) " 
1256 K$=INKEY$:IFK$=""THEN1256 
1261 IF K$="Y" THEN GOTO1501ELSE 

RETURN 
1266 CLS:S=1 
1271 TI(S)=TI(S)*10000 
1276 PRINT:PRINT"OPTION";S;:PRIN 
TUSING"$######.##»;TI(S) 
1281 S=S+1 :IF S=5 THEN 1286 ELS 
E 1271 

1286 IFTI(2)<=TI(3)THEN1291ELSE1 
296 

1291 IFTI(2)=0THEN1296 ELSE IFTI 
(2) <=TI (4)THEN1301ELSE1296 
1296 IFTI(3)=0THEN 1311 ELSEIFTI 
(3)<=TI(4) THEN 1306 ELSE1311 
1301 TI(6)=TI(1)-TI(2) :GOT01316 
1306 TI(6)=TI(1)-TI(3) :GOT01316 
1311 TI(6)=TI(1)-TI(4) :GOT01316 
1316 PRINT: PRINT "YOU CAN SAVE " ; 
:PRINTUSING"$######.##";TI(6) 
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Take your CoCo to the MAX. 



ICOLORWARE 




This is one of those rare 
programs that will captivate 
everyone in your family.... 
No one can see CoCo Max 
and not want to try it! 




We are all witnessing an exciting revolu- 
tion in microcomputers: a radically new 
kind of computer and software that 
opens a whole new world of creative 
power to computer users. 

It was inevitable that this exciting ap- 
proach would be brought to the CoCo. 
With this in mind, Colorware chose to 
go all out and maximize this new con- 
cept for the color computer. That meant 
designing not just software but hardware 
too. It meant thousands of hours of pure 
machine language programming. Rarely 
has this much effort been applied to one 
product tor the Color Computer. 






UNMATCHED CAPABILITY... 

Because we took the maximum approach: 
highly optimized machine code combin- 
ed with hardware, CoCo Max truly 
stands above the rest as the ultimate 
creative tool for the Color Computer. It's 
unrivaled performance lets you create 
with more brilliance and more speed 
than am similar system - much more 
than you ever imagined possible. And, 
you can do it in black & while or color. 



File Edit Goodies Fonl Style 



L _ 

qH 



= Memory2j 



HIT 1 ! ■■■■■■ ■■■ ■■■■■■ 

■■■■ ■■ ■■ 
■■■■■■■ 
■■ ■■ 
■■■■ ■■■ 



■■ 
■■■ ■■■■ 
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All the sophisticated power of the bigger 
systems is there: Icons, Pull-Down Menus, 
lull Graphic Editing, Font Styles, and all 
kinds of handy tools and shortcuts. 

Plug your joystick, mouse or touch pad 
into CoCo Max's Hi-Res Input Unit. Then 
use a delightfully simple Point-and-Click 
method to get any of CoCo Max's power- 
ful graphic tools. It has them all: 



You can Brush, Spray or Fill with an\ Col- 
or, Shading or Pattern. Use Rubber Band 
Lines and Shapes (square, rectangle, cir- 
cle, elipse, etc.) to create perfect illustra- 
tions with speed and ease. There's a Pen- 
cil, an Eraser and even a selection of 
Caligraphy Brushes. And, as you can see, 
CoCo Max can do a lot with text. 
All of the newest special effects are 
there: Trace Edges, Flip, Invert, Brush Mir- 
rors, etc. And all of the very latest super- 
capabilities like: Undo, which 
automatically reverses vour mistakes, and 
Fat Bits which zooms \ou way in on am 
part oi your subject to allow dot-for-dot 
precision. 




THE BIG PICTURE 

The large image box in the middle of the 
CoCo Max screen is actually only a win- 
dow on an even larger image. Use the 
Point-and Click "Hand" to effortlessly 
move your window over any portion of 
the larger image. You have a working 
area of up to 3-','a times the area of the 
window itself. 



FLEXIBLE PRINTING... 

CoCo Max gives you many ways to print. 
Fill a whole page with your image or 
condense two full CoCo screens to less 
than '<4 page for a finely detailed copy. 
"Dump" your CoCo Max screen lull size 
or shrink it to '/« page size. 



FREEDOM TO CREATE... 

Anyone who wants to create anything at 
all on their CoCo screen or printer will 
certainly be very glad to meet CoCo 
Max. CoCo Max's friendly yet 
sophisticated graphic and text 
capabilities let you almost instantly pro- 
duce illustrations, diagrams, charts, 





You may then use CoCo Max's graphic 
magic on it. The DS-69 is available as an 
option from Colorware from S149.95 
complete with its own software on disk 
or tape. Using the DS-69 with a disk re- 
quires an RS multi-pak adaptor. 



graphs, and computer art - for serious 
use or just for creative fun. 



tion by using software schemes such as 
sliding windows. Although clever, these 
schemes yield sluggish and awkward 
results. Only CoCo Max does it the right 
way. The CoCo Max Hi-Res Input Unit 
plugs into your ROM slot and adds an 
entirely new joystick input to your com- 
puter - a precision one with a 49,152 
point resolution to match the CoCo 
screen exactly. 
Plug your same joystick, mouse or touch 







COCO MAX REQUIREMENTS 

The CoCo Max System includes the Hi- 
Res Input Unit, software on disk or 
cassette (please specify) and user manual. 
It will work on any 64K Extended or non- 




AN ABSOLUTE GUARANTEE 

CoCo Max is a hardware software system 
that no software-only system can 
match. Gel CoCo Max and see your 
CoCo perform as it never could before. 
If you don't agree that CoCo Max is the 
ultimate creative tool for the Color Com- 
puter, simply return it within 20 days for 
a full, courteous refund from Colorware. 

THE HARDWARE... 

This is the key to CoCo Max's unmatch- 
ed pertormance. Did you know the nor- 
mal joystick input built into the Color 
Computer only allows access to 4,096 (64 
x 64) points on theCoCo screen? Yet, the 
Color Computer's high resolution screen 



pad into this new input and you have a 
whole new kind of control. The dif- 
ference is remarkable. 





A DIGITIZER OPTION... 

We studied all the video digitizers 
available and picked the best of them to 
link with CoCo Max. The DS-69 from 
Micro Works was our choice. This op- 
tional device lets you capture the image 
from any video source (video recorder, 
camera, etc.) on your Color Computer. 



extended Color Computer. You'll need a 
Radio Shack or equivalent joystick, 
mouse or touch pad. Disk systems re- 
quire a Multi-Slot Interface or Y- 
Branching Cable. 

THE COMPLETE COCO MAX SYSTEM, 
with software on DISK $69.95 

with software on CASSETTE (Available 
Mar 85) S69.95 

Y-BRANCHING CABLE-ii you have a disk 
system but do not have a Multi-Slot In- 
terface, use this economical 40-pin, 1 
male, 2 female cable to connect the 
CoCo Max Hi-Res input unit and your 

disk controller to your CoCo $27.95 

Sorry, COCO MAX is nol compatible with JDOS 



[COLORWARE 



has 49,152 (256 x 192) pixels. This means 
that a joystick, mouse or even a touch 
pad can, at best, only access about one 
tenth of the pixels on the CoCo screen, 
Most graphic programs ignore ihis hard- 
ware limitation of the Color Computer 
and give you only low-res control. 
Others attempt to overcome the limita- 




Colorware Inc. 
78-03 F Jamaica Ave. 
Woodhaven, NY 11421 
(718) 647-2864 



VISA 








Jtff 









ORDERING INFORMATION 

ADD $3.00 PER ORDER FOR SHIPPING AND HANDLING. 
C.O.D.S ADD SJ.00 EXTRA. 

SHIPPING AND HANDLING tOR CANADA IS SS.IIO 
IVf ACCEPT VISA. MASTER CARD. M.O.S. CHECKS. 
VI. RESIDENTS MUST ADD SALES TAX. 



Why do more CoCo owners 

choose 'REAL TALKER'? 



Sure it's priced right, but there's more... 



Thousands of 'Real Talker' owners know 'Real Talker' beats ALL 
other Coco voice synthesizers in ease of use and flexibility. And, 
NO other Coco talker has a clearer, more intelligible voice. 
That's quite a lot of advantage when you consider Real Talker's 
unbeatable price. Yet, Real Talker has some important features 
that you simply will not find in other Coco talkers: 



'SAY' command - You'll have your 
computer talking brilliantly in just 
minutes thanks to this powerful 
new command. Type SAY 
"ANYTHING YOU WANT" and 
your words are instantly spoken. 
It's that simple. Think how easy 
this makes creating speaking Basic 
programs. Adding speech to your 
existing programs is a snap too. 

'CONVERT' - This is a truly power- 
ful command for the basic pro- 
gramer. CONVERT automatically 
transforms a machine language 
dependent speaking program into 
a stand-alone Basic program. In 
other words, you can effortlessly 
write speaking Basic programs that 
do not require a machine language 
translator in memory. This is a uni- 
que feature of 'Real Talker'. No 
other voice synthesizer gives you 
anything even remotely ap- 
proaching this type of capability - 
even synthesizers costing con- 
siderably more. 




'Real Talker' is compatible with any 16K, 32K, 64K Extended or 
non-extended Color Computer. It works with any cassette or 
disk system and comes complete and ready to talk through your 
T.V. or monitor speaker. Price includes the 'Real Talker' elec- 
tronic voice synthesizer in a ROM pack, software on cassette 
(may be transferred to disk), and user manual. 



NOW INCLUDED WITH 
'REAL TALKER'. 

1. 'DR. T/U/f-This interactive "Eliza" 
type psychoanalyst program will 
discuss your innermost problems 
at length. 

2. 'TALKING BATTLESHIP'-W's you 

vs. the computer in this speaking 
version of the classic game. 

3. TALKING BLACKJACK'- Play for 
big stakes against a rather talkative 
casino dealer. 



ONLY 



'Real Talker' is a full-featured electronic mice syn- 
thesizer unit built into a compact cartridge case. You 
simply plug it into Ihe side of your computer. 



$5995 



Other features include software controlled pitch, unlimited 
vocabulary text-to-speech, and even a program that will recite 
any ASCII file (such as from Telewriter-64 & other word pro- 
cessors). You also get Colorvvare's unique full-screen phoneme 
editor program that let's you experiment with and modify speech 
at it's most fundimental level. 



'REAL TALKER-V (iox the original Color Computer) $59.95 

■REAL TALKER-2' (for the Color Computer-2) $64.95 

'Y - BRANCHING CABLE' For disk systems. If you have a disk 
system but do not have a Radio Shack Multi-Slot unit, this 
economical cable will allow to connect and use your 
Real Talker and Disk system together 27.95 



TALK 




If you have a 'Real Talker', do not deprive yourself 
of this absolutely incredible machine-language 
Talking Head simulation program. While other 
talking head simulations use a minimal cartoon- 
like face, TALKHEAD uses high resolution, full- 
screen, digitized images of an actual person's lace 
to create a life-like animated effect. 




SOFTWARE FOR THE 'REAL TALKER' 

TALKHEAD can be easily commanded in Basic to 
appear on screen and say anything you want. 
Available on cassette or disk for only $19.95, 
TALKHEAD requires 64K and a Colorware 'Real 
Talker'. 

only*19.95 

ACTUAL UNRETOUCHED PHOTO 



COLORWARE INC. 
Tf*f\t f\D\AJAaC 78-03F Jamaica Ave. 
LWVfc%##l MflC Woodhaven, NY 11421 

(718) 647-2864 



VISA 
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• • * ORDERING INFORMATION • • • 

ADD S3.00 PER ORDER FOR SHIPPING AND HANDLING. 
C.O.D. 'S ADD $3.00 EXTRA. 

SHIPPING AND HANDLING FOR CANADA IS SS.00 
WE ACCEPT VISA. MASTER CARD, M.O.'S. CHECKS. 
N.V. RESIDENTS MUST ADD SALES TAX. 



1321 K$=INKEY$:IFK$=""THEN1321 


THE MONTHLY" 


1326 IFK$="P"THEN GOSUB 1381 ELS 


1471 PRINT "PAYMENT EVERY TWO WEE 


E 1331 


KS. THIS SCHEDULE LEADS TO THE 


13 31 PRINT: PRINT" PRESS <R> TO RE 


EQUIVALENTOF 13 MONTHLY PAYMENT 


VIEW OPTIONS AND RUN PROGRAM AGA 


S EVERY YEAR RATHER THAN THE 


IN" 


USUAL 12." 


13 3 6 PRINT: PRINT"PRESS ANY OTHER 


147 6 PRINT "THIS MAY NOT SOUND LI 


KEY TO END" 


KE MUCH OF A CHANGE. BUT ITS EFF 


1341 K$=INKEY$:IFK$=""THEN1341 


ECT IN CUTTING THE TIME AND 


1346 IFK$="R"THEN 1366 ELSE 1351 


COST OF ANYMORTGAGE IS ASTOUNDIN 


1351 CLS:PRINT@ 200, "happy saving 


G." 


ii 


1481 K$=INKEY$:IFK$=""THEN1481 E 


1356 END 


LSE 1486 


1361 GOSUB 1181 


1486 CLS:PRINT"THIS METHOD OF RE 


1366 S=l 


PAYMENT IS option 2. YOU WILL 


1371 TI(S)=0:PB=0:Z=0:TB=0:TP=0: 


SEE HOW MUCH CAN BE SAVED WITH 


LS=0 : EP=0 : Y=0 : S=S+1 : C2=0 


THIS OPTION WHEN YOU COMPARE 


1376 IF S=4+l THEN 1156 ELSE 137 


INTEREST PAID ON ALL OPTIONS." 


1 


1491 PRINT: PRINTTAB (10) "HIT ANY 


1381 ZZ=0 


KEY" 


1386 FORXX=1024TO1535 


1496 K$=INKEY$:IF K$=""THEN 1496 


1391 YY=PEEK(XX) :ZZ=ZZ+1 


ELSE 103 6 


1396 PP=YY AND 127 


1501 CLS 


1401 IF PP>95 THENPP=PP-64 


1506 FOR L=1024 TO 1055 


1406 PRINT#-2,CHR$(PP) ; 


1511 POKE L, 175: NEXT L 


1411 IF ZZ=32 THEN PRINT#-2 : ZZ=0 


1516 L=1056 


1416 NEXT XX 


1521 S=1:X=0 


1421 RETURN 


1526 X=49 


1426. PRINT"LUMP SUM AMOUNT 


1531 POKE L,X 


. " ; : PRINTTAB (21);: PRINTUS ING " $ # 


1536 L=L+64 


###.##", -LS:RETURN 


1541 X=X+1 


1431 PRINT"EXCESS PAYMENT 


1546 IF X=53 THEN 1551 ELSE 1531 


";: PRINTTAB (21) ; : PRINTUS ING" $### 


1551 FOR L=1280 TO 1311 


.##";EP: RETURN 


1556 POKE L,175 


143 6 CLS 


1561 NEXT L 


1441 CLS: PRINT "HERE'S THE BEST I 


1566 FOR L=1025 TO 1280 STEP 32 


DEA TO COME ALONG IN QUITE A 


1571 X=175 


WHILE: PAY OFF YOUR MORTGAGE FAS 


1576 POKE L,X:NEXT L 


TER,IN ORDER TO GET A QUICKER 


1581 PRINT@291,"X 1 5 10 15 


EQUTIY BUILDUP IN YOUR HOUSE. 


20 25 30" 


144 6 PRINT"IT USED TO COST A LIT 


1586 PRINT§320, "INTEREST = X TIM 


TLE MORE EACH MONTH TO REACH 


ES $10,000" 


THIS GOAL. BUT A NEW KIND OF MOR 


1591 S=1:X=0 


TGAGE THAT IS JUST TAKING HOLD I 


1596 L=1058+X 


N THE U.S. CAN MAKE THE PROCESS 


1601 TI(S)=TI(S)/10000 


ALMOST PAINLESS . 


1606 F=FIX(TI(S)) 


1451 PRINT"FASTER MORTGAGE PAYME 


1611 FORL=L TO L+F 


NTS WILL SAVE YOU A FORTUNE IN 


1616 POKEL,191 


INTEREST RATES . 


1621 NEXTL 


1456 PRINTTAB (10) "HIT ANY KEY" 


1626 X=X+64 


1461 K$=INKEY$:IFK$=""THEN1461 E 


1631 S=S+1:IF S=4+l THEN 1641 EL 


LSE 1466 


SE 1596 


1466 CLS:PRINT"THE NEW WAY TO FA 


1636 POKEL,191 


STER HOME OWNERSHIP IS THROUGH A 


1641 PRINT@384,"HIT <C> TO CONTI 


BI-WEEKLY PAYMENT PLAN. YOU 


NUE PROGRAM " 


R LOAN IS AMORTIZED AS IF I 


1646 PRINT@416,"ANY OTHER KEY WI 


T WERE GOING TO LAST FOR 30 YE 


LL END PROGRAM" 


ARS. BUT... INSTEAD OF PAYING 


1651 K$=INKEY$:IF K$=" "THEN1651 


ONCE A MONTH, YOU MAKE 1/2 OF 


1656 IFK$="C"THEN 1266ELSE 1351 ^ 
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Give us your best: Join the ranks of these courageous CoCoists in showing the Color Computer world 
your high score at your favorite micro-diversion. We want to put your best effort on record in THE RAINBOW'S 
"Scoreboard" column. All entries must be received 60 days prior to publication. Entries should be printed 
— legibly — and must include your lull name, address, game title, company name and, of course, your high 
score. Each individual is limited to three score entries per month. Send your entries to Scoreboard, c/o THE 
RAINBOW. The "Rainbow Scoreboard" is now a bimonthly feature. 

For greater convenience, your high scores may also be sent to us through the MAIL section of our new 
Delphi CoCo SIG. From the CoCo SIG> prompt, pick MAIL, then type SEND and address to: EDITORS. 



• Current Record Holder 



Shutout 



* 



AN DRONE (Radio Shack) 

54.300 *Daphnle Phillips. Evansvllle. Wl 
ASTRO BLAST (Mark Dalai 

53.950 *Bill Fritsch, Whitehall. PA 
ATOM (Radio Shack) 

54 *Brent Hoaton. Anderson. SC 
53 Alan Drazen. Longwood, FL 
BASEBALL (Radio Shack) 

525-50 *Bob Dewitt, Blue Island. IL 
89-0 •Skipper Taday, East Lyme. CT 
BATS AND BUGS (THE RAINBOW, 7/84) 

24,600 *Michael Rosenberg, Preslonburg, KY 
3,050 Jay Lose, Gullport. MS 
3,000 Michael Scott, Johnstown, NY 
2,500 Steven Bullard, Allen, OK 
BLACKBEARD'S ISLAND (NOVASOFT) 

79 *Jett Roberg, Wlnfield, KS 
BLACKJAK (THE RAINBOW, 4/84) 

$10,000 *Wayne Dewitt, Blue Island, IL 
BLACK SANCTUM (Mark Data) 

106 *Jetl Hillison, Blacksburg, VA 
109 Gregg Shay. Sunnymead, CA 
109 James Stakelin, Cynthiana, KY 
BREWMASTER (NOVASOFT) 

279,600 *Alan Drazen, Longwood, FL 
216.350 Jean-Francois Morin, Loretteville, 

Quebec 
166.175 Scott Purrone, Roselle Park. NJ 
98,875 Chris Cope, Central, SC 
78,100 Steve Leonard, Roselle Park, NJ 
21.500 Joel Miller. Neenah, Wl 
BROTAN THE BLUE (THE RAINBOW, 8/85) 
1,384 *Michael Scott, Johnstown. NY 
822 Brian Voges, Jasper, IN 
BUSTOUT (Radio Shack) 

21 ,850 *Charlos Egglesfield, Saull Ste Marie, 

Ontario 
18,403 Chris Zepka, North Adams, MA 
14.500 Wayne Dewitt. Blue Island, IL 
13.000 Ken Dewitt. Blue Island, IL 
6,500 George Frausto. Blue Island, IL 
BUZZARD BAIT (Tom Mix) 
4.455,150 *Paul Rumrill, Gales Ferry, CT 
3,091.700 Blossom Mayor, East Greenbush, NY 
101,450 Jay Pribble, Davenport. I A 
75.700 Paul Bullman. Rocky Mountain 

House, Alberta 
55.450 Terry Pribble, Davenport, IA 
CANYON CLIMBER (Radio Shack) 
9.129.100 *Gary Mohnsen. Tucson. AZ 
1,004,000 Brett Fancher, Hooksott, NH 
362,400 Chris Reynolds, Richmond, KY 
330,400 Duane Sholter, Nipawin. 

Saskatchewan 
286,800 Beverly Herbers, Placentla, CA 
62,000 Mark Lemke, Neenah, Wl 
60.400 Steve Thomas, Ogdensburg, NY 
42,800 Joel Miller, Neenah, Wl 
C ASHMAN (MichTron) 

$31,260 *Frad Neumann. Hailey. ID 
27,530 Sally Naumann, Hailey. ID 
24.920 Edwin Prather. Oxnard, CA 
17.850 Matt Mendez. Baltimore, MD 
CLOWNS « BALLOONS (Radio Shack) 
352,020 *Faye Keeler, Augusta. GA 
45,460 Joyce Walcott. Mt. Clemens, Ml 
31,770 Cameron Walcott, Mt. Clemens, Ml 
30,190 Jason Smith, Ellijay. GA 
30,070 Paul Wolcotl, Mt. Clemens, Ml 
COLOR BASEBALL (Radio Shack) 

707-0 *»Chislain Chillis. Trois-Rlvleres. 
Quebec 



549-0 eSkipper Taday, East Lyme, CT 
243-0 'Steve Mutton, Shrewsbury, MA 
147-1 Alton Updike, Deltona, FL 
105-0 "Francis Yu, Calgary, Albena 
COLORPEDE (Intracoior) 
3,107,194 *John flay, Goodlettsville, TN 
133,036 Mariano Frausto, Blue Island, IL 
59,529 Kevin Radwan. Blue Island, IL 
37,560 Mark Motel. Blue Island, IL 
15,056 Hiram Esparza, Blue Island. IL 
COLOR POKER (THE RAINBOW. 4/83) 

1,168,900 *Earl La Jesse Foster, Lynchburg. VA 
CRASH (Tom Mix) 

25,100 *Jean-Francois Morin, Loretteville, 
Quebec 
CRYSTLE CASTLES (Thunder Vision) 

850,156 *Michael Brennan, Calgary, Alberta 
800.060 Dan Mltenko. Calgary, Alberta 
689,751 Edwin Prather, Oxnard, CA 

559,380 Jell Dinger. Edgewood, MD 
545,000 Jay Roberg, Winlield, KS 
98,125 George Frausto, Blue Island, IL 
DALLAS QUEST (Radio Shack) 

90 *Roy Grant, Toledo, OH 

91 John Semonin, Akron, OH 

93 Tommy McClure, Doyllne, LA 
93 Robert Sunderland, Sacramento, CA 
DEFENSE (Spectral Associates) 

77,345 *Mario Brule, Pointe Aux Trembles, 

Quebec 
56,720 Brett DuPont, Oregon. OH 
DEMOLITION DERBY (Radio Shack) 
97.600 *Hillel Morris, Chicago, IL 
88,800 Skipper Taday. East Lyme, CT 
54,700 Scott Balthazor, Neenah. Wl 
43,100 Chris Fox, Midlolhian, VA 
37,000 Alexander Taday, East Lyme, CT 
DEMON ATTACK (Imagic) 

57,655 *Tracy Salzman. LaSalle, CO 
29,750 Mike McGeoch, Havertown, PA 
19,445 Erik Hullman, Rochester Hills, Ml 
10,830 Rupert Young, Shellield, MA 
DEMON II (THE RAINBOW, 3/85) 

21,925 *Kelth Schuler, Merritt Island. FL 
DESERT RIDER (Radio Shack; 

32,488 *Erik Hullman, Rochester Hills, Ml 
DOODLEBUG (Computerware) 
1,685,350 *Caroline Cyr, Ottawa. Ontario 
1.457.290 Thomas Haythornthwaite, Ottawa, 
Ontario 
825,370 Susan Balllnger, Uxbridge, Ontario 
805,010 Bill Fritsch, Whitehall, PA 
585,070 Johnny Fritsch, Whitehall, PA 
DOUBLE BACK (Radio Shack) 
1,618,400 *Diane Guernon. Montreal, Quebec 
614,450 Eugene Roosa. Stone Ridge, NY 
450,600 Michael Brennan, Calgary, Alberta 
8.970 Curtis Taylor, Scarborough, Ontario 
DRACONIAN (Tom Mix) 

628,470 *Jeft Coladonato, Roslyn, PA 
DRAGON FIRE (Radio Shack) 

5.827 *Susan Coker, Austell, GA 
2,885 Stevie Hice. Newton. NC 
1,520 Bette Hatcher, Norwalk. CA 
DRAGON SLAYER (Tom Mix) 

44,800 *Wllllam Fuler. Bridgelon. NJ 
DUNKEY-MUNKEY (tntelleclronics) 

66.900 *Mlchael Drouln, Reeds Spring, MO 
16,500 Baiju Shah, Deep River, Ontario 
1 1,000 Mariano Frausto, Blue Island, IL 
ELECTRON (Tom Mix) 

40,650 *Brad Gaucher. Hinton. Alberta 



FALCON'S LAIR (THE RAINBOW, 8/85) 

17,463 *Mlchael Scott, Johnstown. NY 
14.627 Alexander Taday, East Lyme, CT 
12,497 Dick Teeter, Hawley, PA 
8,430 Brian Voges, Jasper. IN 
7,792 Steve Artmeier, Jasper, IN 
FANGMAN (Tom Mix) 

155.225 *Danlel Thompson, St. Louis. MO 
FOODWAR (Arcade Animation) 

270.360 *Edwin Prather. Oxnard. CA 
165,960 Chris Cope, Central, SC 
FOOTBALL (Radio Shack; 

266-0 *»Tlm Hart, Salt Lake City, UT 
THE FROG (Tom Mix) 

1 1 .080 *Mark Ferris. Deep River. Ontario 
GALACTIC ATTACK (Radio Shack) 

33.930 *Allison larosis, Owego, NY 
30,870 Oren Bergman, Herzlia, Israel 
19,410 Ron Volans, Ogdensburg, NY 
GALAGON (Spectral Associates) 

1,306,640 * Jackie Maddox. Iron Station, NC 
GHANA BWANA (Radio Shack) 

218,420 *Rupert Young, Shellield, MA 
146.930 Brian McGregor. Oshawa, Ontario 
132,970 Karen Goddard, Oshawa, Ontario 
128,430 Tom Gaynor. New Miltord, CT 
1 15,840 Price Wood Jr., Florence, SC 
GHOST GOBBLER (Spectral Associates) 
84,410 *Greg Erickson, Lowell. MA 
76.900 Ghislain Chillis, Trois-Rivieres. 

Quebec 
72.960 Sylvain Caslonguay, Chicoutimi. 

Quebec 
55,1 20 Jetl Weeks, Wetaskawin, Alberta 
47.630 Alan Drazen, Longwood, FL 
GOLD RUNNER (NOVASOFT) 

373,850 *Carmen Izzi Jr., Waterbury. CT 
274.300 Andrew Reeves. Woodinville, WA 
265,600 Eric Crichlow, Las Vegas, NV 
243,500 Chris Cope. Central, SC 
222.450 James Bower, Tuckerton. NJ 
ICEMASTER (Arcade Animation) 

85,225 *Pierre-Antoine Levesque, Salnte-Foy, 
Ouebec 

THE INTERPLANETARY FRUIT FLY (THE RAINBOW, 1/85) 
37,000 *Scott Perkins, Port Orange, FL 
22,000 Sleven Bullard, Allen. OK 
16,500 Michael Scott, Johnstown. NY 
JUNIOR'S REVENGE (Computemare) 

1.072,600 *Matlhew Ramsay. Detroit, Ml 
JUNKFOOD (THE RAINBOW, 11/84) 

1.187,520 *Larry Thomson, Menominee, Ml 
KAMAKAZIE KAR (THE RAINBOW. 8/85) 

59.95 *Matthew Schwenk. Catasauqua, PA 
KEY BOMBER (THE RAINBOW, 8/84) 

29.052 *Tony Boring, Armagh, PA 
THE KING (Tom Mix) 
1,670.900 *Yolanda Farr, Sayre, PA 
29,450 Mark Motel, Blue Island. IL 
14,500 Ken Dewitt, Blue Island. IL 
KING TUT ( Tom Mix) 

138.500 *Martin Culver. San Francisco. CA 
KLENDATHU (Radio Shack) 
1,177.550 *Dan Franzen. Westlake, OH 
412,809 Jay Pribble, Davenport, I A 
266,362 Brian Ennis. Wilmington. NC 
KNOCK OUT IDiecom Products) 

131,210 *Eric Crichlow, Las Vegas. NV 
107,895 Bret Dennis. Delaware, OH 
LASERWORM & FIREFLY (THE RAINBOW. 1 1/83) 
38,380 *Brian Voges, Jasper, IN 
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LEMANS (Spectral Associates) 

0:70 *Jell Dinger. Edgewood. MD 
LUNAR-ROVER PATROL (Spectral Associates) 
249,510 *Ken Pledge. 100 Mile House, 

1 British Columbia 
1 36.700 Lorl Day. Arlington. TX 
MADNESS & THE MINOTAUR (Radio Shack) 

240 • *Chris Mitchell, Byron, GA 
MARATHON (THE RAINBOW. 10/83) 

307.790 +James Sheedy III. Tonawanda, NY 
MAROONEDI (Saguaro) 

58 -A-Mlkel Rice, Panama City. FL 
THE MARTIAN CRYPT (NOVASOFT) 

31 *John Allocca, Yonkers. NY 
MEGA-BUG (Radio Shack) 

14.785 *Blain Jamieson. Kingston. Ontario 
10,223 Jamas Mancari, Ravenswood, WV 
8,054 Jeremy Johnson, Nokomls, FL 
7.930 Ron Haines, Nepean, Ontario 
7.801 Jen Teeter. Hawley. PA 
7.542 Dick Volans. Ogdensburg, NY 
MISSILE BARRAGE (THE RAINBOW, 6/83) 

2-1 * Joe Calcaterra, Ridgewood, NY 
MONKEY KONG fMed Systems) 

365 *Mark Ferris, Deep River. Ontario 
MONSTER MAZE (Radio Shack) 

206,780 *Wanda Jones, Brantford, Ontario 
93,890 Rupert Young, Shellield. MA 
60, 1 20 Steve Thomas. Ogdensburg. NY 
43.610 Tim Cragg, Kahoka, MO 
10,740 Scolt Swedis, Spencer, MA 
7,300 Scott Ballhazor, Neenah, Wl 
MOON HOPPER (Computerware) 

79.830 *Daniel D'Amour. Pincourt, Quebec 
MR. DIG (Computerware) 
6.787,000 *Jell Roberg. Winlield, KS 
3,533,650 Paula James, Lumberlon, TX 
NINJA WARRIOR (Programmer's Guild) 
108.000 *Enc Gladstone. Ocala. FL 
106.300 Spencer Reeves. Baton Rouge, LA 
42.800 Steven Warmath, Memphis, TN 
28.800 Dave Iverson, Oakville, Ontario 
NUMBER BUMPER (THE RAINBOW, 10/85) 

416 *Nedra Bishop, Jacksonville, FL 
ONE-ON-ONE (Radio Shack) 

424-10 *Brian Biggs, Galloway. OH 
OPERATION FREEDOM (THE RAINBOW, 8/85) 
73,529 *Kirby Smith, York, PA 
12,673 Alexander Taday. East Lyme, CT 
12.275 Brian Hanna, London. KY 
10,926 David Brave, Bloomlield, CT 
PAC-TAC (Computerware) 

1 20.050 *Matt Johnson, Eagle, PA 
PENGUIN (THE RAINBOW, 2/85) 

48.250 #Paul Wagorn. Carp, Ontario 
44,550 Kevin Gallagher, Sanla Monica, CA 
20,780 George Bodiroga. Eureka, CA 
1 ,660 Robert Nicosia, Gloversvllle, NY 
PLANET INVASION (Spectret Associates) 

155,000 *Jimmy Doyle. Barrackville, WV 
67.700 Alan Drazen, Longwood, FL 
58.650 Ghislain Chillis. Trois-Rivieres. 

Quebec 
39,350 Paul Hotz, Herzlla, Israel 
17.800 Laura Hotz. Herzlla. Israel 
POLARIS (Radio Shack) 

189.867 *Andre Savoie, Marieville, Quebec 
29.472 Ron Volans. Ogdensburg, NY 
POLTERGEIST (Radio Shack) 

7,430 *Myriam Ferland, Trois-Rivieres. 

Quebec 
6,000 Billy Falrlull, Charleston, SC 
4,840 iSteve Thomas, Ogdensburg, NY 
POOYAN (Datasolt) 
3.785.000 *Bon Collins, Clemson, SC 

61.930 Erik Huffman, Rochester Hills. Ml 
11,450 Helen Dewitt, Blue Island, IL 
8,500 Hiram Esparza, Blue Island, IL 
POPCORN (Radio Shuck) 

50.1 10 *Nancy Ewart, Toms River, NJ 
45,210 Mike Norrls, Columbia, SC 
30.570 Becky Volans, Ogdensburg, NY 
20.730 Myriam Ferland, Trois-Rivieres, 
Quebec 
PYRAMID (Radio Shack) 

220/112 *Byll Adams, Pasadena, TX 



*George Fairfield, Victoria, 

British Columbia 
*David Oelhaupl, Calgary, Alberta 
♦ Robbie Sablotny, ML Zion, IL 
♦Gregg Shay, Sunnymoad, CA 
O-NERD (THE RAINBOW, 5/84) 

1,958,950 *Bruce Baltzer. Hanover. Ontario 
QUIX (Tom Mix; 

907,320 *Andrew Nome, Mississauga, Ontario 
RACER (THE RAINBOW, 3/85) 

301.9 *Kirby Smith, York. PA 
283.4 Jennifer Woland. Silverdale, PA 
12.9 Robert Nicosia, Gloversvllle, NY 
12.4 Michael Scott. Johnstown, NY 
RADIO BALL (Radio Shack) 
4.510,740 *Les Dorn, Eau Claire, Wl 
1,301,350 Brian Matherne, Gretna, LA 
RETURN OF THE JET-I ( ThunderVision) 

538,432 *Malt Grllflths, Stilwell. KS 
REVERSE (THE RAINBOW. 7/84) 

7 *Jon Hobson. Plainliold. Wl 
ROAD RACE (THE RAINBOW, 1 1/84) 

91.7 *8ill Martin, Myrtle Beach. SC 
RO8OTR0N (Intracolor) 

467,000 *Todd Hoogo S Ian Dawson, Comox. 

British Columbia 
335,400 Bai|u Shah & Mark Ferris, Deep River, 
Ontario 
ROBOTTACK (Intracolor) 

463,650 *Jay Pribble, Davenport, IA 
299,350 Chris Zepka, North Adams, MA 
36,090 Hiram Esparza, Blue Island, IL 
RUN FOR YOUR LIFE (THE RAI NBOW. 4/85) 

80,000 *Bnan Jensen, Drayton Valley, Alberta 
50,000 Karen Goddard, Oshawa, Ontario 
20,000 Ryan Devlin, Louisville, KY 
20,000 Brian Voges, Jasper, IN 
SAILOR MAN (Tom Mix) 

879.100 *Alan Drazen, Longwood, FL 
351,700 Bob Dewitl. Blue Island. IL 
131.600 Ron Volans. Ogdensburg. NY 
87.500 Kevin Radwan, Blue Island, IL 
SANDS OF EGYPT (Radio Shack) 

77 *Jeff Hlllison, Blacksburg, VA 

John Allocca, Yonkers, NY 

Bob Dewitt, Blue Island, IL 

Jeff McKay. Travis AFB. CA 

Greg Ross, Martinsville, NJ 

Phill Zarlos, Dallastown, PA 

SEASTALKER (Inlocom) 

100/223 *Erik Huffman, Rochester Hills, Ml 
90/212 Jeff Hlllison. Blacksburg, VA 
SHAMUS /Radio Shack) 

62.940 *Jon Blow. San Diego. CA 
SHENANIGANS (Mark Data) 

90 *Roy Grant, Toledo, OH 
95 Jeff Hlllison, Blacksburg, VA 
95 David Kay, Winnipeg, Manitoba 
SHOOTING GALLERY (Radio Shack) 

227,840 *Cliff Farmer, McGregor, TX 
16,500 Ken Dewitt, Blue Island, IL 
SHUTTER BUG (THE RAINBOW, 10/83) 

3,861 *Darren Griffin, Gloucester, Ontario 
SIR EGGBERT JUMPER (THE RAINBOW. 8/85) 
960 *Jorge Polo. Muscle Shoals, AL 
SKIING (Radio Shack) 

1:00 *Scott Clevenger, Fairmount, IN 
1 :00 *Billy Falrlull. Charleston, SC 
1:10 Kevin Gallagher, Santa Monica, CA 
1:17 Michael Drouln. Reeds Spring, MO 
SLAY THE NERIUS (Radio Shack) 

472.667 *Jlm Herbers, Placentia. CA 



80 
B0 
82 
84 
86 



SPACE AMBUSH (Computerware; 

29,480 #Frank Canepa III, Santurco, 
Puerto Rico 
SPACE ASSAULT (Radio Shack; 

232.120 *Jim Tucker. Commerce, TX 
24,430 Michael Drouln, Reeds Spring, MO 
19.065 Steven Allen, Sharpsburg, MD 
18. tm Robin Volans, Ogdensburg, NY 
SPACE RACE (Spectral Associates) 

83,422 *Mark Donahue, Alexandria, VA 
SPACE WREK (Spectral Associates) 

58.300 *Brad Gaucher. Hinton. Alberta 
SPEED RACER (MichTron) 

142,100 *Chris Harrison, Brooks, KY 
139,210 Alan Drazen, Longwood. FL 
1 29,950 Jeff Dinger, Edgewood, MD 
128,590 Paul Hotz. Herzlia, Israel 
126,750 Jack Manzullo. Saginaw, Ml 
91,670 Bob Dewitt, Blue Island, IL 
88,900 Kevin Radwan, Blue Island. IL 
83,230 Mariano Frausto. Blue Island. IL 
STAR BLAZE (Radio Shack) 

8,400 *John Guptill. Columbia. MO 
7,050 Andreas Thaler, Coatlcook, Quebec 
6,950 Scott lachetta, Rochester, NY 
STARSHIP CHAMELEON (ComputsrwareJ 

68.800 *Brian Voges. Jasper, IN 
STORM ARROWS (Spectral Associates) 

285,850 * Arnold Snitser, Los Angeles, CA 
STRANDED (Computer Island) 

70 *Mlkel Rice, Panama City, FL 
TEMPLE OF ROM (Radio Shade; 

959,400 *Sonya Hurst, Richmond, CA 
101.100 Mark Lemke, Neenah. Wl 
75.000 Joel Miller. Neenah, Wl 
TIME BANDIT (MichTron) 
1.026,210 *Terry Moore. St. Catherines, Ontario 
747,460 Steven Coladonato, Roslyn, PA 
359,980 Krlstopher Staller, Ft. Wayne, IN 
215,810 Mark Olson, Whitecourt, Alberta 
106.390 Sylvain Castonguay. Chicoutlml. 
Quebec 
THE TOUCHSTONE (Tom Mix) 

226,640 *Kristophor Staller, Ft. Wayne, IN 
TUTANKAM (Aardvark) 

321,660 *Pierre-Antoine Levesque, Seinte-Foy, 
Quebec 
TUT'S TOMB (Mar* Data) 

225,160 *Robert Wright, North Queensland, 

Australia 
189,960 Nicole Poullot Coors, Mobile, AL 
92,500 Bernie Moberly, Portage La Prairie, 
Manitoba 
WARP FACTOR X (Prickly-Pear) 

2,301,823 *Yakini Banks, Saint Albans, NY 
WHIRLEYBIRD RUN (Spectral Associates) 
117.000 *Jeff Ray, N. Charleston, SC 
105,400 Sylvain Castonguay, Chicoulimi, 

Quebec 
54,500 Jay Aust, Marlborough, CT 
43,850 Glen Bilodeau, Otterburn Park, 

Ontario 
43,350 PJ Jayakody, Shelbyville, TN 
WILLY'S WAREHOUSE (Intracolor) 

296,700 *Chrls Reynolds, Richmond, KY 
183,500 Alan Morris, Chicopee, MA 
ZAXXON (Datasolt) 

253,400 *Bob Dewitt, Blue Island, IL 
59.700 Brian McKendrick, Ogdensburg. NY 
52,100 Jason Comin, Pine Point, 

Northwest Territories 
35,000 George Frausto, Blue Island, IL 



— Debbie Hartley 
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In conjunction with the rainbow's Scoreboard, we offer this column of 
pointers for our game-playing readers' benefit. If you have some interest- 
ing hints and tips, we encourage you to share them by sending them to 
.the Scoreboard, c/o the rainbow. 



FEEDBACK 

Scoreboard: 

First to Tommy McClure [December 
1985, concerning To Preserve Quandic]: 
You don't use the car at all, except to get the 
cat. To use the helicopter, you type RIDE 
HELICOPTER. 

Now to Ric Miller [December 1985, 
concerning To Preserve Quandic]: I don't 
like to use "attack guard," because some- 
times you lose. The best thing to do is get 
the cat, and the guard will leave because he 
is allergic to cats. 

Now, to Jon Olson [December 1985]: To 
get the flashlight in Dallas Quest, you type 
PULL CURTAIN. 

Also, 1 have a few hints for Calixto Island. 
After you make both trades with Trader 
Jack, the teleporter will disappear. So, be 
sure to get everything over to the marshy 
field before doing the trades. 

1 hope all of this information has been 
helpful. 

Kevin Holderbach 
Mesa, AZ 



to get objects and place them in specific 
areas, which is necessary to solve the Adven- 
ture. 

Two actions that are unnecessary to 
complete the Adventure are important to the 
overall campaign of the Hall of the King 
trilogy. First, you must get the huge glass 
pane and place it upon the center square 
after GOing onto the catwalk. Then READ the 
glass pane or center square. This will give 
you information about the entire quest. 

Second, you must find the parchment 
whose meaning will be divined later in the 
quest. This can be done by examining the 
desk in the study. 

This is all the help 1 can fairly give. Good 
luck with solving the rest of the Adventure. 

Glen Dahlgren 

Author o/Hall of the King 

Pittsburgh. PA 



AUTHORS' NOTES 

Scoreboard: 

To make Brotan the Blue a bit easier to 
play, change the following in the program: 

Eliminate PUT(CD,Y)-(CD+8,Y+11) ,SP: 
in Line 34 and change Line 40 to read: 
40 RR=RNO(100):IF RR>50 and RR<53 
THEN GOTO 50 ELSE GOTO 18 

The red gremlins will appear less often 
and attaining freedom will be easier for you. 
Enjoy the game! 

Alan A. Sapor la 

Author of Brotan the Blue 

Woodside. NY 

Scoreboard: 

In Prickly-Pear's new Adventure, Hall of 
the King, there is a vital command omitted 
in the documentation: PUT. This allows you 



RINGS ARE GOOD FOR THE IMAGE 

Scoreboard: 

I would like to share a few tips for Dun- 
geons of Daggorath. I have killed all of the 
creatures except the Evil Wizard. 

First, save to tape after you kill a creature 
and get an object. 

After you have several duplicate objects, 
drop them in the same room you are in. 
When a creature enters the room, you can 
attack many times while he is occupied 
picking up the objects. The more objects you 
drop, the more attacks you can make. 

When you kill the Image of the Evil 
Wizard you must have a new torch in use 
and your best sword in one hand. The 
contents of your backpack are lost when you 
kill this creature. 

Save your incanted rings for use against 
the Image of the Evil Wizard. All other 
creatures you meet first can eventually be 
killed without using the rings. 

Do not go up a ladder to escape a creature. 
This will be quite hazardous to your health. 

The Hale Flask slows your heart rate and 
allows you to attack, or get away from, a 
creature. 



The Vision Scroll allows you to see a map 
of the level of the dungeon you are in. 

The Seer Scroll shows the position of the 
creatures on the dungeon map. 
1 hope you find these tips useful. 

Daniel L. Quigg 
Richmond, KY 



THE VORTEX FACTOR 

Scoreboard: 

I recently purchased The fortex Factor 
from Mark Data Products. It is a challeng- 
ing and exciting Adventure with excellent 
graphics. Some tips are: When you get the 
key to the south door, type OPEN DOOR then 
GO DOOR to enter. When you get to the room 
with the cylinder, type GO CYLINDER. Type 
GET CALENDAR when you go to the main 
office and see what you find ! 

One final tip: The only way you can find 
objects and treasures is if you EXAMINE 
things closely. 

I also have some questions. How do you 
open the bank? How can you make the time 
machine work? Is there a secret passage 
behind the bookcase? If anyone can answer 
my questions, please write to the "Score- 
board." 

Tommy Crouser 
Dunbar, WV 



To respond to other readers' inquiries and 
requests for assistance, reply to "Scoreboard 
Pointers," c/o THE RAINBOW, P.O. Box 
385, Prospect, KY 40059. We will imme- 
diately forward your letter to the original 
respondent and, just as importantly, well 
share your reply with all "Scoreboard" 
readers in an upcoming issue. 

For greater convenience, "Scoreboard 
Pointers" and requests for assistance may 
also be sent to us through the MAIL section 
of our new Delphi CoCo SIG. From the 
CoCo SIG> prompt, pick MAIL, then type 
SEND and address to: EDITORS. 

— Debbie Hartley 
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The publishers of the Rainbow 

are taking an interest 

in a different type of programming 




S^viDioMONTHLY 



I 
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THE HOME VIDEO MONTHLY 




Yes, I'm ready for some real entertainment! Send 
the next 12 issues of VCR to my door. 

Subscribe now for only $15 and save 36% off the regular newsstand price. 



Name 

Address 
City 



□ My check in the amount of 



State 



ZIP 



is enclosed. (In order to 



hold down costs, we do not bill.) 
Charge to: D VISA □ MasterCard 

Account Number 



D American Express 
Exp. Date _ 



Signature 



■Subscriptions lo VCR are S15 a year in the United States, Canadian rate is U.S. $22. Air mail rate elswhere is U.S. 
$60. All subscriptions begin with the current issue. Please allow 5 lo 6 weeks (or first copy. Kentucky residents add 
5% sales tax. U.S. currency only, please. In order to hold down non-editorial costs, we do not bill. 



J 



That's right. We've decided 
that programs like Shenani- 
gans and Symphony 12 aren't 
the only great ones around. There 
are also Silver Streak and Star Trek 
and Some Like It Hot — software 
of a different sort. 

That's why we are introducing 
VCR, The Home Video Monthly, 
the magazine for the new gener- 
ation of home viewer. 

Home video has evolved 
beyond the "hacker" era, when 
you needed a degree in electron- 
ics just for a little entertainment. 
Most people don't care about how 
the signal-to-noise ratio and wow- 
and-flutter specs of their equip- 
ment compare to the latest mod- 
els. They simply want to know how 
best to use and enjoy the equip- 
ment that they have. 

And that is what VCR will offer 
— how to get the very best in 
home entertainment from your 
equipment. 

Each month, VCR will bring you 
previews and ratings of every new 
offering on tape and disc: music 
videos, children's shows, how-to 
guides, and movies, movies, mo- 
vies. 

We will tell you which shows the 
critics themselves will be taping on 
the networks and cable, along with 
tips from the experts on how to get 
the best possible reproductions. 
And you can turn to us for the 
answers to your questions, ranging 
from the trivial to the technical. 

Even more, each month we will 
feature exclusive interviews with 
the stars and the star-makers, 
along with articles designed to 
help you relive some of your fond- 
est video "memories" of the past. 

Yes, programming is more than 
spreadsheets and databases. And 
we know you'll want to be a char- 
ter subscriber to the guide to the 
very best in entertainment soft- 
ware. 

VCR, The Home Video Monthly, 
debuted in January. 



Mail to: VCR, The Falsoft Building, P.O. Box 385, Prospect, KY 40059 



WHEN QUALITY COUNTS 




Jjtauon'S 

WORD PROCESSOR 2.2 

TAPE OR DISK VERSION 
A failure packed program ihm lurns your CoCo inio an of- 
fice machine. Create ami save loiters and docunicms With 
the word processor tailored for the SG-IO. 



BLUE STREAK II 

SERIAL TO PARALLEL INTERFACE 



• RUN COCO I or II lo PARALLEL PRINTER 

• HIGH QUALITY TOGGLE SWITCH ELIMINATES CABLE SWITCHING 

• 300. 600. 1200. 2400. 4800. 9600 SWITCH ABLE BAUD RATES 

• AC POWER OPTIONAL-NOT NEEDED WITH SG-10 PRINTER 

• COMPLETE WITH ALL CABLES AND CONNECTORS 
•THRU-PUT EQUIVALENT TO -^ ...»„n m ™..„ 

BUFFERED INTERFACES fiF§\ $5^95 SHIPPING 

• 180 DAY WARRANTY BBSS? 



1 YEAR WARRANTY 

BLUE STREAK II INTERFACE 
WITH MODEM SWITCH 

• SUPER GEMPRINT 

• TYPE SELECTION/TUTORIAL 

• WORD PROCESSOR 2.2 

COMPLETE 

S10 Shipping 
and Insurance 
SG- 15-439" 



'•% 






PAID! 





SUPER GEMPRINT 

CUSTOM SOFTWARE 



Overall, Super Gemprint is very well-written and documented." 

—Rainbow December 84 review. 

BONUS! TYPE SELECTION/TUTORIAL PROGRAM 

FREE WITH SUPER GEMPRINT 

Menu driven program for the CoCo. Teaches and shows the new 
user the numerous features of the SG-10. 



SUPER GEMPRINT AND 

TYPE SELECTION/TUTORIAL PROGRAM 
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95 



+ $2 Shipping 
and Handling 



DAYTON A SSOCIATES^, INC. 



<mM? 



AUTHORIZED 
DEALER 



DUN & BRADSTREET LISTED 

7201 CLAIRCREST BLDG. C 

DAYTON, OHIO 45424 

OHIO RESIDENTS ADD 6'/ 2 % SALES TAX 

C.O.D. ADD $2.00 



AUTOORDERLINE 

1-800-251 STAR 

Personal Service 

(513)236-1454 



RAINBOW RE 






BMC Monitor Stand 

Makes CoCoing Comfortable/ Spectrum Projects, Inc 207 , 

Buzzworm 

Watch out for the Deadly Bite/A/ovasoft 1 88 

Calculating Parts Per Million 

Does the Figuring for You/Green Horizons 195 

CCZAP 

Helps Find Hidden Control Codes/Mafr/x Computing 1 85 

CoCo Calendar 

Can Help You Get Organized/Specrrum Projects, Inc 209 

CoCo Cooler Too 

Play It CooUREM Industries, Inc 1 88 

CoCo Incognito 

Packed with Useful lnformation/f?C Creations 208 

CoCo Keyboard Cover 

A Real Undercover Operation/ft£M Industries, Inc 191 

Don Pan 

Good for Arcade Beginners/Tandy Corp 199 

Geography USA 

An Excellent Learning TooUViking, Inc 206 

Gold Runner 

Fast and Furious/A/ovasoft 1 96 

House Doc 

An Electronic Doctor on Call/For Your Health Software 202 

Marble Maze 

Presents a Challenge for All Ages/D/'ecom Products 197 

Micro Illustrator 

Creates Dazzling Graphics/Tandy Corp 203 

Omniverse 

Venture to New Universes/Compufenvare 184 

Orchestra-90/CC 

Impressive Music Production/Software Affair 189 

Puzzler 

Educational Fun for Adults and Children/Co/or Connection Software ... 1 90 

SDOS 

Powerful Package Perfect for Hackers/Software Dynamics 200 

Stylo-Pak 

A New Standard for Word Processing/Sty/o Software 192 

Super Directory Catalog 

Keeps Track of Disk Files/Mefa/sofY 1 98 

TX 

Word Processor Written in BAS\C/Kolesar B/S 209 
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RECEIVED & CERTIFIED 



The following products recently have been 
received by the rainbow, examined by our magazine 
staff and approved for the Rainbow Seal of 
Certification, your assurance that we have seen the 
product and have ascertained that it is what it 
purports to be. 

This month the Seal of Certification has been 
issued to: 






Hall of the King, a 64K graphics Adven- 
ture requiring a disk drive. The scenario 
places you as a seasoned Adventurer on 
a quest for the legendary Earthstone, a 
powerful cornerstone of a dwarven 
race's magical prowess. This two-disk 
Adventure allows players to save or 
load a game at any stage of the Adven- 
ture. Prickly-Pear Software, 2640 N. 
Conestoga Avenue, Tucson, AZ 85749, 
disks $39.95 plus $1.50 S/ H 

Semigraphics 4 Editor, a 32K ECB 

graphics utility featuring these capabil- 
ities: Built-in character set with four 
sizes, use of all eight colors on same 
screen, saving screens at DRTfl state- 
ments for inclusion in BASIC programs 
and complete cassette and disk I/O. 
CMD Micro Computer Services Ltd., 
10447 124 Street, Edmonton, Alberta, 
T5N 1R7, distributed in the U.S. by 
Saguaro Software, P.O. Box 1864, 
Telluride, CO 81435, cassette $14.95 
plus $2 S/H 

Disk Management System Version 2, a 

16K disk program filing system requir- 
ing a disk drive that allows users to keep 
copies of disk directories and file allo- 
cation tables, restore directories, high 
speed search for programs, machine 
language sort and print (32K only) and 
user adjustable defaults. CMD Micro 



Computer Services Ltd., 10447 124 
Street, Edmonton, Alberta, T5N 1R7, 
distributed in the U.S. by Saguaro 
Software, P.O. Box 1864, Telluride, CO 
81435, disk $19.95 plus $2 S/H 



Line Editor, a I6K programming utility 
for assembly and PASCAL source code 
that uses Hi-Res 51 by 24 column screen 
with true upper- and lowercase charac- 
ters. Features include auto-repeating 
keys, BASIC loader to permit user mod- 
ifications and built-in help screens. 
CMD Micro Computer Services Ltd., 
10447 124 Street, Edmonton, Alberta, 
T5N 1R7, distributed in the U.S. by 
Saguaro Software, P.O. Box 1864, 
Telluride. CO 81435. cassette $17.95 
plus $2 S/H 

CGP-220 Ink Jet Printer Graphic 
Screen Dump Package, a 16K graphics 
utility to print out graphics on a CGP- 
220 Ink Jet Printer and featuring these 
capabilities, four color and one color 
version, special CoCo Max version, use 
on cassette or disk systems and user 
selectable colors. CMD Micro Compu- 
ter Services Ltd., 10447 124 Street, 
Edmonton, Alberta, T5N 1 R7, distrib- 
uted in the U.S. by Saguaro Software, 
P.O. Box 1864, Telluride, CO 81435. 
cassette $14.95 plus $2 S/ H 



NumberJack, a numeric keypad hard- 
ware accessory to facilitate number- 
intensive applications. Measuring 5'^ 
by 1 X A by IVi inches, the keypad can be 
installed without soldering or drilling. 
Comes with complete instructions and 
3-foot plug-in cable with all necessary 
connectors. Included on the keypad are 
four cursor keys, CLEAR, @, decimal 
point, comma, ENTER and the standard 
four math keys. HJL Products, Div. of 
Touchstone Technology Inc., 955 Buf- 
falo Road, P.O. Box 24954. Rochester. 
NY 14624. $89.95 

D.L. LOGO, a 64K programming and 
educational utility requiring a disk drive 
that will run on OS-9 and designed to 
utilize one or two joysticks, the Multi- 
Pak Interface, an X-Pad and the 
Speech/ Sound cartridge to allow users 
to weave shapes, colors, speech, music 
and sound into infinite patterns. Also 
available are mathematical, trigono- 
metric and Boolean functions to allow 
exploration as users create graphics, 
learn arithmetic and spelling, play 
games and strengthen programming 
skills. Tandy Corp., available in Radio 
Shack stores nationwide, manual and 
disk $99.95 

TXD, a 64K disk editing utility requir- 
ing a disk drive. Capabilities include 
allowing the user to trace a file, map it 
out sector by sector, alphabetically sort 
directory filenames, simultaneously 
make a hard copy, edit any sector, 
rewrite and/ or copy to another sector 
and still return to current sector posi- 
tion in the tracing operation. Kolesar 
B/S, 7 Ladd Road, Westfield, PA 
16950, disk $14.95 plus $2 S/H 

Math Mission, a 32K. educational game 
requiring a joystick designed to rein- 
force early math skills in the four 
mathematic operations: addition, sub- 
traction, multiplication and division. 
Joystick orientation is designed to 
develop eye-hand coordination, and 
there is a shot timer to simulate a 
classroom time test as well as four 
optional levels of difficulty. There are 
graphics, sound and written rewards for 
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the players. Sugar Software, 1710 
North 50th Avenue. Hollywood, FL 
33021, cassette or disk $24.95 plus $1.50 
S/H 

Advanced Utilities, a 64K OS-9 pack- 
age to provide OS-9 users these tools: 
KSHELL, that allows wild cards with 
any utility, standard output and error 
paths can be overwritten or appended 
to from the command line, selectable 
prompt of the user's choice; PATH 
comand allows the setup of multiple 
path directories to be searched when a 
command is given; UNLOAD, a repet- 
itive unlink utility to remove modules; 
FLINK, allowing users to have many 
different boot files on a given disk and 
set which one to boot with next time; 
ARCHIVE, backs up large disk media 
onto small disk media by filling one disk 
prompting for a new disk and contin- 
uing until all files are offloaded; CPY, 
performs like the standard COPY plus 
copies multiple files to a given directory. 
Computerware, Box 668, Encinitas, CA 
92024, disk $29.95 plus $2 S/H 

CoCo Keyboard Software, a 16/32/ 
64K ECB utility requiring a disk drive 
that allows users of the HJL-57, Mi- 
cronix or Deluxe CoCo keyboards easy 
access to four of the most used func- 
tions. The function keys on the HJL-57 
and Micronix keyboards or the two 
function keys and the ALT and CTRL 
keys of the Deluxe CoCo keyboards can 
be programmed to perform the follow- 
ing: Text Screen Dump, 9600 Baud 
printer rate, BASIC LIST or cold start of 
the computer. Spectrum Projects, Inc., 
P.O. Box 21272, 93-15 86th Drive, 
Woodhaven, NY 11421. disk $14.95 
plus $3 S/H 

CoCo Calendar, a 32K disk program 
that aids users in keeping track of daily 
schedules, appointments, birthdays, 
etc. Capable of handling any date from 
the present to December 31, 2000, this 



program includes a Hi-Res calendar 
display with the dates containing 
memos marked. Features include entry, 
deletion, retrieval by date and dumping 
to a printer (with user-provided screen 
dump program) the calendar display. 
Spectrum Projects, Inc., P.O. Box 
21272, 93-15 86th Drive, Woodhaven, 
NY 11421, $24.95 plus $3 S/H 

BMC Pan-tilt Monitor Stand, a compu- 
ter accessory that adjusts a 12-inch 
monitor for glare-free viewing and 
capable of revolving 360 degrees and 
tilting 12.5 degrees. No assembly is 
necessary. Spectrum Projects, Inc., P.O. 
Box 21272, 93-15 86th Drive, Wood- 
haven, NY 11421, $24.95 plus $3 S/H 

LISTAID, a 4K machine language 
program designed to format BASIC 
listing to the text screen or printer. 
Neat-0 Software, Rt. #3 Box 205, 
Kingsport, TN 37664, cassette $10 plus 
$2 S/H 

SCRDMP10, a 16K ECB screen dump 
program requiring a dot-matrix impact 
printer and designed to reproduce 
sideways a PMODE 3 or PMODE 4 screen 
dumped to a printer to give a picture 
that is 6I/2 by 7 inches. Neat-0 Software, 
Rt. #3 Box 205, Kingsport, TN 37664, 
cassette $10 plus $2 S/H 

OS-9 Enhancements, an addendum 
introducing the changes and new fea- 
tures of OS-9, Version 02.00.00. In- 
cluded in the list of new commands and 
utilities are: CONFIG, to provide a 
menu of all I/O options and allow 
selection of any legal combination of 
device drivers; HELP, to display the 
syntax and usage of standard OS-9 
system commands; INIZ, to force the 
allocation of device buffers and when 
used at startup, to keep buffers from 
fragmenting memory; other system 
changes to provide capabilities such as 
networking, 32 and 80 column screen 



display and access to a Speech/ Sound 
cartridge. Also, updated GETSTAT, 
SETSTAT and VIRQ system calls. 
Tandy Corp., available in Radio Shack, 
stores nationwide, manual and disk 
$69.95 

Biosphere, a 64K Simulation requiring 
a disk drive. The scenario places you in 
the role of master ecologist and captain 
of the fabulous starship, Arkworld. 
Arkworld contains within its cargo hold 
over 200 varieties and species of plants 
and animals. When you rescue a dying 
world's colony of native animals it is 
your goal to use Arkworld's resources 
to create a new environment in which 
the colony can survive and flourish. 
Tandy Corp., available in Radio Shack 
stores nationwide, disk $29.95 

CoCo EPROM Programmer, an 

EPROM programmer with these capa- 
bilities: will program EPROMS from 
2716 to 27128 and 27512; will program 
the 24-pin 68764 and 68766 EPROMS 
that fit in the CoCo ROM sockets, 
features EPROM Erase?, Verify 
EPROM, Move EPROM to memory, 
Examine/ Change memory and Change 
buffer address. Spectrum Projects, Inc., 
P.O. Box 21271, 93-15 86th Drive, 
Woodhaven, NY 11421, $149.95 plus $3 
S/H 

Health Programs, a 32K home utility 
that contains these nutritional instruc- 
tion features: a list of over 1 80 foods and 
analyses to display how much protein, 
calories, which of 1 1 vitamins and nine 
minerals are contained in the food 
selected, 14 RDA and MDA categories 
and adjustments for the needs of preg- 
nant and lactating women; deficiency 
symptoms and food sources for 21 
nutrients, recommendations for nutri- 
tional therapy for common ailments 
and a PMODE 4 graph for biorythms. 
Health Software. 1521 Lancelot, Borger 
TX 79007, cassette or disk $15 



The Seal of Certification program is open to all 

manufacturers of products for the Tandy Color 

Computer, regardless of whether they advertise in 

THE RAINBOW. 

By awarding a Seal, the magazine certifies the 

product does exist — that we have examined it and 

have a sample copy — but this does not constitute 

any guarantee of satisfaction. As soon as possible, 

these hardware or software items will be forwarded 

to the rainbow's reviewers for evaluation. 

— Monica Dorth 
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GREAT COCO PRODUCTS 



UNIVERSAL VIDEO DRIVER 

WHY DOES THE MARK DATA 
UNIVERSAL VIDEO DRIVER 
OUTSELL ALL OTHERS 
COMBINED??? 
BECAUSE IT'S THE BEST!!! 



Great Price! Only $29.95 



Carefully engineered to 
work with ALL Color 
Computer models 
including the newest 
COCO II. Enables your 
COCO to operate with a 
video monitor instead of a 
television. 




Works with monochrome 
monitors! 
Works with color 
monitors! 
Audio Connection 
included! 
1 Easy installation- 
no soldering! 



SPECIAL— Order one of our quality video monitors and 

get the Mark Data Universal Video Driver for just $24.95 

SAVE $5.00 



QUALITY VIDEO MONITORS 





SAKATA COLOR SC-100 $239.95 

The SC-100 is a streamlined 11" composite 
monitor which produces sharp, brilliant 
colors. The cabinet is made or durable sly- 
rene and is available in an atiraciiw; on-white 
color. Includes audio with speaker and ear- 
phone jack. We highly recommend thiscolor 
monitor because of its excellent performance 
and beautilul styling. 

Order a quality monitor from us and get a 
Universal Video Driver for only $24.95 



CAMBRIDGE GRAPHICS AMBER 
SCREEN MONITOR $119.95 

A 12" amber screen composite monitor of the 
hijihest quality with exceptional reliability 
and performance. 18 MHZ bandwidth. At- 
tractive off-white cabinet. We use this moni- 
:ur in our offices. 
We carry other brands also. 
Call for additional information. 



Save $5.00 



SERIAL TO PARALLEL PRINTER INTERFACE 

300 to 9600 baud. Complete with all 

cables and connectors. 

Only $49.95 



NEED MORE MEMORY? 64K Memory Expansion Kit 

All parts and complete instructions (for 'E' and 'F' 

boards and CoCo II). 

NOW ONLY $14.95 



^ 



PRINTERS 



NEW Star Gemini 
SG-10 model printer 

Only $249.95 

120 cps w/true 

descenders, 

2K buffer; 

proportional 

spacing. New model for 1985. 




"The Connecting Link" 




ONLY $29.95 



COCO-UTIL 

CoCo-Util is a valuable utility 
program that allows you to transfer 
Tandy Color Computer disc files 
to your MS-DOS machine. You 
may also transfer MS-DOS files to 
a Color Computer disc. CoCo-Util 
will save you countless hours of 
retyping... a great new utility. 




GREAT BARGAINS ON 
COCO DISC DRIVES! 

COMPUTE SYSTEMS INCLUDE: 

• Hi-Quality Teac Thin Line Drives 

• Attractive, Beige Dual Drive Cabinet/Power Supply 

• Fill Panel (or Single Drive Disc Systems 

• Radio Shack or NEW TYPE I & M Disc Controller 
Olfenng Switch Selectable Roms and Parallel Printer Port 

• Cable and Operating Manual 

• Full 90 Day Warranty 

Single Drive ISSDD) in Dual Cabinet w/Controller $299.95 

Additional Drive 89.95 

Two Drives ISSDD) in Dual Cabinet w/Controller 384.95 

Single Drive IDSDD) in Dual Cabinet w/Controller 359.95 

Addilional Drive 129.95 

Two Drives IDSDD) in Dual Cabinet w/Controller 484.95 

Dual Cabinet/Power Supply 79.95 

Disc Controller (Radio Shack or | & M) 139.95 

Connecting Cable 24.95 

Radio Shack DOS ROM 1.1 or J/DOS w/Manual 39.95 



SUPER PRO KEYBOARD 




WHY 
PAY 

MORE? 
The best is 
only $59.95 



U.S. made 



FOR D, E AND F BOARD MODELS 

Original Key layout 
Fast, easy installation- 
no soldering 
• Individually boxed with 
full instructions 
Smooth 'Touch Typist" feel- 
no sagging 
-high quality, quad gold contacts 



Professional, low profile, finished appearance 



"Computers produced after approximately Oct. 19B2 require 
an additional keyboard plug adapter Please add $3.95. 



$ Save Money on Your Cassette & 
Disc Supplies $ 

We buy cassettes and discs in large quantities lor our own use and can pass Ihe 
savings on to you. 

C-10 Cassettes w/labels .59 ea 10 lor S5.50 

Cassette storage box .25 ea 10 for 2.00 

Basic 1.2 ROM $39.95 

Extended 1.1 ROM w/Manual 49.95 

Disc I.I ROM or l/DOS ROM w/Manual 39.95 

5*4 Discs 

High quality, nationally advertised brand. Guaranteed Performance. We will 
replace any disc lhat fails during normal use. Discs are double density, reinforced 
hub with sleeve. $12.95 for 10 discs in an attractive storage box. • Creal Price! 



MC* 1 



DISC STORAGE 




Attractive, heavy duty acrylic case with 
lock. Holds and protects 50 5*4" discs with 
five moveable indexed dividers. 
SUPER BARGAIN ONLY $9.95 

SPECIAL - Purchase this attractive storage case 
including 10 discs for only $21.95. 



SERIOUS STUFF 



ACCOUNTING SYSTEM 

The Mafic Data Products Accounting System is ideal for the small businessman needing a 
fast, efficient means to process- income and expense*, prepare detailed reports and 
maintain most of the information required at tax time. The system is a family of programs 
which operate by means of a "menu" selection scheme. When the operator selects a task 
to perform, the computer loads a program designed to handle that task from the system 
disc The system disc contains all of the programs required to create, update and maintain 
data files and prepare the necessary accounting reports including a transaction journal, a P 
& L or income report, an interim or trial balance and a balance sheet. 
This accounting software equals or exceeds higher priced packages for other computers 
and include, a detailed operating manual. ONLYS99.95 



ORDER ENTRY SYSTEM 

The M.u k [Jala Product sales order processing system provides a fast, efficient means to 
enter inders, print shipping papers and invoices, prepare sales reports, and monitor 
receivable- The system automatically enhances the monitor screen to a 51 character by 24 
line display. J2K of memory is required along with an &Q-column printer and one or more 
disc drives. 

This order entry software equals or exceeds higher priced packages for other computers 
and includes a detailed operating manual. ONLY $99.95 



EASY EDIT 

Easy- Edit is a ver satile, easy to use text editor which is particularly convenient for assembly 
language and BASIC programming. This editor offers powerful text handling capabilities 
along with many special features including a built-in disc operating system, 32/64K memory 
sense, a 51 character by 24 line screen, auto key repeat, extensive error reporting, and 
complete compatibility with popular assemblers. Requires 32K and at least one disc drive. 
Master disc and instructions are packaged in an attractive 3-ring binder. $34.95 



EASY-FILE 



Data Management 
System 



Rainbow, Nov. '84 ~Easy File is one program that lixes up to its name . . .Easy Fife is so easy it speaks 
(or itself" 

Hoi CoCo, Feb. '85 "I've examined four database programs for the CoCo in the last few months. 
Easy File is the easiest to master and the one that best addresses my needs. If you need to organize 
the information in your life. Easy File might just be the best method." 

Need a good mailing list or customer list program? How about a program to keep track of your in- 
vestments, your computer magazines, or record collection? Do you have an inventory of all house- 
hold items for insurance purposes' EASY-FILE will do all of these things and many more. The 
EASY-FILE master disc and instructions are packaged in an attractive 3-ring binder. Requires 32K 
and at least one disc drive. 

Order Yours Now! Gel Organized for Only $59.95! 



SUPER SCREEN 

The Color Computer Supercharger 

• A big 52 character by 24 line screen 

• 'PRINT @' is fully implemented on the big screen 

• Easily combine text with hi-res graphics 

• Auto-key repeat fo' greater keyboard convenience 

• The 'ON ERROR GOTO' statement is fully implemented ' 

• Control codes for additional function 

Guaranteed to be the most frequently used program in your software library. . .once you use it you 
won't be without it! Cassette $29.95 Disc $32.95 




JUST FOR FUN 
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The Greatest Hi-Res Graphic Arcade 
Game Ever Written for Your CoCo! 



SUPER ACTION 



Welcome Shock Trooper Squad Commander 

Intelligence has intercepted a coded message revealing a plan to 
conquer Earth. Four of your Shocktroopers must infiltrate the heavily 
defended underground enemy base and steaf all of their secret TRG-5 
attack saucer sub-assemblies. Return them to our scientists for analysis. 
This secret information is crucial to our defense. 32K Required. 
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By Rob Shaw, author of 
Tilt's Tomb 

Another of our outstanding 
arcade games. 
Don't miss it! 



Also: Presenting the Sixth and Most Challenging of Our Adventures 



By Bob Withers 
. and Steve O'Dea 



THE 

VOfiTEX 




FACTOR 



What is it? What secrets does it hold? The seeker of 
treasures through time and space must find out! From 
the coliseum otancient Rome to the futuristic world 
of tomorrow. ^ 

Join us in this new and \JVwYVl 

unforgettable odyssey. 



Other Exciting Adventures 


Calixto Island • 


Shenanigans 


Sea Search < 


Trekboer 


Black Sa 


in turn 




All Games - Cassettes $24.95 Discs $27.95 32K Required 



SHIPPING: All orders under $100 please aiM iJ regular, $5 air. All orders over $100 please add Vh regular, 8% .iir. California residents plea- .idd 0% sales tax. Orders outside 
lhecontlnenl.il U.S.. check with us for -.hipping amount: please remit U.S. funds. Software authors— contact us tor exciting program marketing details. We accept MaMerCard 
and VI5A. Distributed in C.inadn by Kelly Software. 

FREE— Send for our free catalog flier. 




Mark Data Products 



Department c 24001 ALICIA PKWY., NO. 207 • MISSION VIEJO, CA 92691 • (714) 768-1551 
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Venture to New Universes 
and Save Earth in Omniverse 



In this new 64K graphics Adventure by Scott Cabit for 
Computerware, you, mild-mannered theoretical physicist, 
have discovered gateways into new dimensions and 
universes. Unfortunately, you've also learned of an alien 
plot to set up networks of these gateways and, through 
them, conquer Earth. You can save Earth by leaving your 
equations, computer and synchrotrons behind and sallying 
forth on an adventure to discover these gateways. 

While the program loads into the computer, gather up 
paper and pencil, for you are about to exchange your life 
as physicist for that of Adventurer/ cartographer. In 
addition, you'll want a labeled, formatted disk (or a blank 
tape if you have the tape version) on hand for the saves you'll 
want to make at strategic intervals. 

The Adventure begins on a snowy plain. You first stand 
watching the snow fall before journeying onward. In this 
Adventure you can use a joystick or the arrow keys for the 
compass directions (shifted up- and down-arrow keys for 
moving up and down). When you wish to examine some- 
thing, use the standard two-word, verb-noun command 
sentence. Some Adventurers like to know which words are 
known to the program, others think part of the fun is 
discovering which words have meaning. In Omniverse, folks 
of the former persuasion need only type VOCflB to see most 
of the known words, while others can avoid this. Typing 
HELP sometimes gives further assistance. 

When you come to the area of a gateway and approach 
from the proper direction, you suddenly hear music; the sky 



Two-Liner Contest Winner . . . 

Guitar Capo asks you for a capo number and 
responds with all the chord and note changes. 

The listing: 

10 DIMN$(12) ,N1$(12) ,N2$(12) : FOR 
T=0TO11 : READN$ (T) : Nl$ (T) =LEFT$ (N 
$(T) ,2) :N2$(T)=RIGHT$(N$(T) ,2) :N 
EXT: DATA C B#,C#D-,D ,D#E-,E F- 
,F E#,F#G-,G ,G#A-,A ,A#B-,B 
C- 

15 INPUTA : CLS : PRINT @j3 , " " ; : INPUT" 
CHORDS/NOTES ON CAPO NO . " ; C : PRIN 
T"FRETTED", "SOUNDED" : IF Oil THE 
N 15: ELSE FOR T=j3 TO 11:PRINTN1$ 
(T)":"N2$(T) , :IF C+T>11 THEN C=C 
-11:D=T+C:PRINTN1$(D) ":"N2$(D) :N 
EXTT:GOT015 ELSE PRINT N1$(T+C)+ 
":"+N2$(T+C) :NEXT T:GOT015 

Donny Schiavone 
Tulsa, OK 

(For ihis winning two-liner contest entry, ihe author has been sent copies 
of both The Second Rainbow Book Of Adventures and its companion The 
Second Rainbow Adventures Tape.) 



turns red and the words "You feel very strange" signal that 
you are being transported to another universe, first from 
the ice to a desert. There is no turning back! When you 
happen upon Sam's Saloon, you will want to pause long 
enough to watch as Sam wipes the bar — one of the cutest 
graphics in Adventuredom! 

Once you find the gateway out of the desert, you are 
transported to a jungle, from there to a desert island and, 
after a few surprises, find yourself on a barren, rocky 
volcanic island, and hopefully will be able to solve the 
Adventure and thus save Earth. When you do, you are 
treated to a scrolling Mercator projection of Earth and the 
song "Happy Trails." 

The game is loaded by typing LOfiDN "OMNI"; the disk 
starts whirring and OK appears on the screen — then panic 
sets in — the disk keeps whirring madly and there is no 
cursor after the OK prompt. At this point the temptation 
is great to push the Reset button, thinking the program has 
fouled up. Resist that impulse! The program itself is loading 
— and it takes over one minute. Eventually, the drive stops 
spinning and the usual color check appears on the screen. 
Since the loading of Omniverse is different from usual, I 
think Computerware should mention it in the loading 
directions. 

The save game feature used is also new to me, and a few 
words of caution are in order here. I mentioned that your 
progress can be saved before each peril, real or imagined; 
you number each one from zero to nine, but individual saves 
do not show up in the directory when the DIR command 
is used, and FREE returns 68, even if there are 10 saves on 
the disk. Disk inspection reveals that Omniverse writes 
directly to Track 0. If, in haste, you grab the first formatted, 
blank disk in your disk box and forget to label it, you could 
mistake this for another blank disk at some future date. If 
you do not record on your map the number of the individual 
save, as well as where it occurs, a save you wish to keep 
can easily be overwritten. 

There are a number of features included in Omniverse 
that are not found in the average Adventure. In addition 
to being able to use the joystick or arrow keys for 
movement, those with the Radio Shack speech module can 
elect to have all writing, which appears on the screen, 
spoken through their speech cartridge. If you tire of this 
feature, it can be toggled off. Scott Cabit also includes 
multipart music in the program, and thoughtfully allowed 
for those of us in a hurry to get on with the action to 
abbreviate it by depressing the space bar. However, the 
music is so well-done that you will want to take the time 
to listen to it at least once. 

Omniverse has over 200 locations in several separate 
"worlds" to inspect, so, of course, many use the same 
pictures. Some of these are outstanding and, overall, the 
pictures are clear and colorful. There are fewer objects to 
inspect than in many Adventures and few real puzzles. 
Everyone will have a lot of fun wandering about and 
enjoying its special features, but it is not too difficult for 
the average Adventurer. Careful map-making is the key to 
success with this one. 

(Computerware, P.O. Box 668, Encinitas, CA 92024, 
requires 64K, tape $24.95, disk S27.95 plus $2 S/H) 



— Carol Kueppers 
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CCZAP Helps Find 
Hidden Control Codes 



About two days after I got my disk drive, I discovered 
what a disk zap program is for. I'm sure no one else has 
ever accidentally gotten a write-protect tab stuck in his disk 
drive, but believe it or not, I did. You would be amazed how 
poorly a disk drive writes with a protect tab floating around 
in it! I found out the hard way. Luckily, I had a friend with 
a zap program. He helped me out of my problem. 

CCZAP is a disk zap utility program. A disk zap is a 
program that reads the contents of a disk directly and 
without regard to the nature of the data. Generally the user 
is given a choice of format for the presentation of the data, 
i.e., ASCII, hexadecimal or some combination of the two. 

I received CCZAP on a disk along with four pages of 
documentation that covered the bare bones operation of the 
program. One of the surprising things in the documentation 
is all the possible drive variations for which the authors have 
allowed. The program allows you to have up to four drives, 
up to 80 tracks per drive and up to 36 sectors per track. 
This nice feature allows those with JDOS and double-sided 
drives to use CCZAP. 

To make the program start, the user inserts the disk with 
CCZAP in Drive and types RUN "RUNCCZAP". This is not 
a misprint; the program name is RUNCCZAP. The 
program loads a binary file that is patched with the answers 
the user supplies about track numbers, sector counts, etc. 
The program then allows you to save this setup for future 
use. From this point on, the program is completely menu 
driven. 

The main menu gives several options: 

R — read a user specified track and sector 

M — modify the selected track and sector 

W — write the modified selection 

SHFT CLR — print the selection 

B — exit to BASIC 

; — advance to the next sector 

back up to the previous sector 

The first action the user must take in using the zap program 
is to read the desired track and sector. Both the track and 
sector must be entered in hexadecimal. 

Entering 'M' at the main menu allows you to modify or 
examine the contents of your selected track and sector. This 
display is in ASCII format with all nonprintable characters 
as periods. When examining sector contents, it is sometimes 
useful to see all the contents including the otherwise hidden 
control codes. This is accomplished by pressing the CLEAR 
key. Pressing the BREAK key takes you back to the main 
menu. Changing the contents of the sector is done by using 
the arrow keys to position the cursor over the desired 
character and simply typing over it. If the display is in 
ASCII you must use ASCII, if not, you must use hexadec- 
imal notation. After changing the sector, you must use the 
' W selection to write the desired changes to disk. 

At the main menu the user may advance one sector at 
a time by pressing the ';' key or back up one sector by 



pressing the '-' key. This action must be followed by the 'R' 
selection to read the new sector. 

All of the program selections ran well and I was not able 
to break out of the program, nor was I able to make the 
program crash. 

While I cannot honestly fault the CCZAP in any 
particular section, 1 did not feel comfortable using it. This 
is the first program I have used in which I felt trapped by 
the menu-driven structure. For example, if you are looking 
for a particular piece of data in a file and incorrectly guess 
its location, you must go back to the menu, make another 
guess, read the data and examine the data. This is not 
particularly user friendly. Forcing the user to enter track and 
sector in hexadecimal and allowing the user to view the 
contents either in Hex or ASCII, but not both at the same 
time, is also not very user friendly. 

I would like to suggest to the authors that rather than 
a menu screen, the display could be the sector itself. The 
menu could be above and below in a scroll-protected area. 
This would allow the user to see the contents and not have 
to return to the menu to select another sector. If the authors 
divided the screen into two halves, left and right, the Hex 
notation and the ASCII could be viewed at the same time; 
it would make the user's job much simpler. As a user, I 
would gladly exchange the ability to see an entire sector for 
the simplicity gained. 

CCZAP is basically a good program that could be made 
a lot better by making it easier to use. The price seems to 
be a little high in light of the current trend to keep software 
prices low and sell more copies, however, I do not hesitate 
to recommend this program. 

(Matrix Computing, P.O. Box 2011, 380 5th Avenue, SE, 
Salmon Arm, British Columbia, Canada VOE 2T0, printer 
optional, disk $49.95 U.S. funds) 

— Larrv Goldwasser 



One-Liner Contest Winner . . . 

This one-liner draws snowflakes at random posi- 
tions on the screen 

The listing: 



PMODE4:SCREENl,l:PCLS:FORD=lTO 
20:A=RND(20) :B=RND(2j3) :C=RND(20) 
:A$="BM"+STR$(RND(216)+2j3)+","+S 
TR$(RND(151)+2j3)+";A"+STR$(RND(4 
) - 1 ) + " ; ND=A ; NU=A ; NL=B ; NR=B ; NE=C ; 
NG=C ; NH=C ; NF=C ; " : DRAWA$ : NEXT : FOR 
Z=1T02 3 00 : NEXT : GOTO 

Garry Sit tier 
Jacksonville. IL 



(For this winning one-liner contest entries, the author has been sent copies 
of both The Second Rainbow Book Of Adventures and its companion The 
Second Rainbow Adventures Tape.) 
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Data Directory 



Filel D Datafile Budget 



AprilB5 Friends Bulletin 



Kidstuff Resumes Yearl985 



Cornpusry DowJones Picturel 
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DeskMate* 7*in4 software 

makes your Color Computer 

better than even 



Now our popular Deskmate® soft- 
ware is available for disk-based 
Color Computers! DeskMate 
(26-3259, $99.95) features seven 
popular personal-productivity 
programs — all on one disk! 

A general-purpose TEATentry 
and editing program performs 
search and replace, file merge and 
block select, copy and delete. It's 
ideal for writing correction-free 
letters, memos and short reports. 

A simple spreadsheet program in- 
cludes an easy-to-use menu and au- 
romatic column formatting. You can 
.ise LEDGER to do budgeting, 
>ales forecasting, profit-and-loss 
jrojections and other "What 
f . . .?" calculations. 

A four-color picture editor lets 




you create lines, 
shapes, patterns, 
I ills in areas 
with color and 
enter text. Using 
PAINT, vou can 
LEDGER create colorful 

charts, graphs, designs and "doo- 
dles" on your screen, then print a 
copy on a dot-matrix or ink-jet 
printer. 

The INDEX CARDS personal fil- 
ing system lets you enter and edit 
data and per- 
form simple 
sorts and 
searches. It's 
ideal lor keep- 
ing track of 
names and 
addresses. 




INDEX CARDS 






TELECOM, a 
communications 
program lets 
you access na- 
tional informa- 
tion services, 
TELECOM pl us transmit 

and receive files from other com- 
puters by phone (requires modem). 

A simple monthly calendar pro- 
gram displays "to do's" for any date. 
CALENDAR is an easy way to or- 
ganize your work day. 

A four- 
function CAL- 
CULATOR, with 
memory, is also 
available within 
any application 
TEXT EDITOR without inter- 
rupting the screen in the program 
you are currently using. 

If you don't already have a disk- 
drive for your color computer, you 
can add one 
for just $299 
(26-3131). The 
5 '/-.", thinline 
floppy drive 
plugs into your 
Program Pak® 
CALENDAR port for over 

156,000 characters of storage. Add 
a second drive at any time, too. 

Radio /hack 

The Technology Store 

A DIVISION OF TANDY CORPORATION 



Free! New 1986 Software Guide RSC-16. 



Mail to: Radio Shack 

Dept. 86-A-096. 300 One Tandy Center 

Fort Worth, Texas 76102 




Name. 



Address . 



City . 



.ZIP. 



J 



Price applies al Radio Shack Computer Centers and par- 
ticipating stores and dealers. DeskMate/Registered TM 
Tandy Corp. 
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Watch out for the Deadly 
Bite in Buzzworm 

You are "Buzzworm," a very hungry snake. Your job (like 
it or not) is to run around a maze full of snake bait. When 
you run over each piece of bait, your tail instantly increases 
in length about one-half inch (talk about eating your 
vegetables). The purpose of the game is not to bite yourself 
while going around the maze. 

Buzzworm is one of the earliest releases from Novasoft. 
It requires 32K of RAM and can be played either on the 
keyboard or with a joystick. 

The game itself is very simple, but with all of the bells 
and whistles it has, you may want to take a closer look. 
Some of the features are as follows: Every fifth screen is 
a surprise bonus round, where bait is worth 100 points, and 
you may not die. Another feature is that when a 10,000 point 
plateau is reached, an egg is dropped on the screen. You 
must try not to eat the egg, even though it is worth 1,000 
points, because inside the egg is an extra buzzworm. 

At the conclusion of a game you may choose to play again 
or to end the game. There is no pause in Buzzworm because 
of the speed. This is one feature I think should be added. 

1 did not think Buzzworm measured up to many of the 
other Novasoft games. It does not have the exciting pizazz 
like all of the other games from Novasoft that I have seen 
lately. 1 give Buzzworm a two-star rating, which is slightly 
below average. 1 recommend that you look at it before 
buying it. 

(Novasoft, 4285 Bradford N.E., Grand Rapids, MI 49506, 
tape SI5.95, disk $18.95) 

— Patrick Downard 



Hint . . . 

Disk Directory Printout 

If you have a long disk directory and want to see 
all of it, or if you simply wish to have a hard copy 
printout of your directory, one simple command 
allows you to do this easily. 

Just POKE 111,254:DIR and the entire disk 
directory will appear on your printer, even if it is too 
long to be fully displayed on the screen. 



Play it Cool 
with CoCo Cooler Too 

Heat! It is a problem known to many CoCo owners. 
Excessive heat can make a CoCo suddenly lock up or go 
off to never-never land, taking your data and several hours 
of work with it. CoCo I owners who have had heat problems 
have been using a product called the CoCo Cooler, a fan 
that draws air through the computer to reduce or eliminate 
heat buildup. Up until now, CoCo 2 owners have been out 
of luck. But wait! Just when you thought all was lost, REM 
Industries has come out with the "Son of CoCo Cooler": 
CoCo Cooler Too. 

The CoCo Cooler Too is a fan designed to attach (with 
adhesive foam) to the left rear of your CoCo 2. To install 
it, all you do is peel the protective strip off the foam and 
position the fan properly over the vent holes on the top rear 
left corner of the case. Once installed, it should never come 
off as the adhesive bonds it securely. After installation, just 
plug the fan into the wall and turn the power on; the CoCo 
Cooler Too starts working. 

CoCo Cooler Too draws air through the inside of your 
CoCo and sends it out into the room, taking the heat inside 
the CoCo with it. I found the CoCo Cooler Too reduced 
the inside temperature of my CoCo by about five degrees, 
but it must be added that my computer runs at only about 
five degrees hotter than air temperature. REM Industries 
claims the Cooler will bring the inside temperature of your 
CoCo to "within 15 degrees of ambient in worst case 
situations." 

I found that using the Cooler caused no inconvenience 
with using my CoCo. The fan makes very little noise — 
certainly no more than the built-in fans on the PC-type 
computers. The fan points down toward the table, so there 
is very little air current to blow things around on your desk. 

If you have a need to reduce heat buildup in your CoCo 
2, the CoCo Cooler Too is a good solution, although the 
price makes this an "as needed" item. Dr. Megabyte says 
if you are not having an excessive heat problem, then you 
most likely don't need this product. It is, however, cheap 
when compared to the cost of down time and repair bills 
caused by overheating your CoCo. 

(REM Industries, Inc., 9420-B Lurline Ave., Chatswortb, 
CA 91311, $44.95) 

— Mark E. Sunderlin 



ENHANCE YOUR COCO! 

The Enhancer gives you mixed text and graphics, 
user-defined keys, PROCEDURES, keyboard AUTO- 
REPEAT, scroll protect. It gives you true lower-case 
letters, 224 characters, user-definable characters, 
reverse/bold/underlined characters. The Enhancer 
adds 15 commands and 3 functions to your CoCo's 
vocabulary. It requires 64K, Extended BASIC. To 
order, please specify tape or disk and send $18.00 U.S. 
to: 

H.D.R. Software 
27 Doyle Street 
St. John's, Nfld. 
Canada A1E 2N9 Tel. (709) 364-3125 
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Orchestra-90/CC Impresses 
with its Music Production 

At the tender age of 5, Beethoven was composing. At 16, 
Mozart was a recognized master. If you've ever felt the urge 
to create your own beautiful music, or even to borrow 
someone else's for your own ends, then you should look into 
the comprehensive stereo music synthesizer, Orchestra-90/ 
CC, from Tandy. Included in the package is a ROM pack 
with stereo outlets and a 100-page manual to get you started. 
The minimum system required is a 16K CoCo and either 
a stereo (for stereo sound) or television (for monaural 
sound). The system can be used with tape or disk (though 
a Multi-Pak is necessary for disk) to save and load 
compositions, a printer to print your music files, or a 
modem to transfer and receive files. 

Right away you will be impressed with the documenta- 
tion. I am an amateur musician (guitar and trombone), but 
no great musical knowledge is necessary to begin program- 
ming music right away. The music language used in 
Orchestra-90/CC makes it possible to transcribe or 
compose music line by line in any time or key signature 
using whole to 64th notes. You can use six octave ranges 
and up to five simultaneous voices using two stereo 
channels. Each of the voices may be assigned any of five 
instrumental choices (tone colors to sound like a trumpet, 
an oboe, a clarinet, an organ or a violin). You can single, 
double or triple-dot the notes, and three articulations are 
possible. You can even modulate (change to a different key) 
within the song. 

A new feature 1 discovered while doing this review is the 
ability to now use the speed-up poke with Orchestra-90/ CC. 
This allows the processor within the hardware to make a 
more accurate sampling, which allows for higher and 
cleaner notes and better sound quality overall. 

When first hooking up your system, a demonstration 
music file of Rossini's "William Tell Overture"shows off just 
what Orchestra-90/ CC can do. Heard over the television, 
this composition is quite impressive, but played over the 



Hint . . . 

What's Your ROM Version? 

With all the talk about new ROMs, you may be 
wondering exactly which ROM you have. If you have 
an older CoCo with Extended BASIC, just read the 
version number of your Extended BASIC at the top of 
the screen on power up. Then, to see which Color 
BASIC ROM you have, type EXEC 41175 and press 
ENTER. 

If you have the new ROMs, Extended BASIC will 
be Version 1.1 and Color BASIC will be Version 1.2. 

On the CoCo 2, Color BASIC will always be Version 
1.2 or 1.3 (which are functionally identical). 



stereo the quality is terrific. With that as cajoling, you are 
ready to begin programming on your own. 

The manual takes you through some samples, beginning 
with simple tunes, then walks you through transcribing a 
piece of music from the score. And speaking of score, the 
system requires a one-letter command to score the music 
you've programmed in before playing the piece. This 
processes your program, but more importantly, it checks 
for any mistakes and highlights them so you can go back 
and easily make corrections before the performance. 

I asked my wife, who teaches junior high music at a public 
school, to look over Orchestra-90/ CC. She was impressed 
with the logic of the music language. She felt it could go 
a long way toward teaching music theory, but on an 
individual basis rather than in a classroom situation. 

Make no mistake about it, this is a powerful music 
synthesizer. It has the capability of producing beautiful 
music, but only as you master the music language. There 
are no frills with this package — no graphics, no flashing 
colors, no actual music printouts — which may be where 
Orchestra-90/ CC is lacking the most. You need to take this 
system seriously for it to be any fun at all. Music can express 
the depths of our souls, and it may take a while to grasp 
the music language, but once you do, you'll be able to 
produce intricate and beautiful music. 

(Software Affair, distributed by Tandy Corp., available at 
Radio Shack stores nationwide, S79.95) 

— Jefferson L. Hatch 




ONLY 

S149°° SPECIAL 

Plus shipping 



BRAND 
NEW 



• 368K of STORAGE CAPACITY 

• RADIO SHACK MODEL 1 , 4 and 

• COLOR COMPUTER COMPATIBLE 

The Digital Equipment RX180 contains two double density, 
40 track, 5Vj inch Shugart compatible mini-floppy disk 
drives with power supply, cooling Ian. and on/off switch and 
line cord. 

Great Radio Shack add ons sure to sell fast 
at this low price . . 

v *j^t/ . Master Charge, Visa, American Express & COD 
^ JKj) rn For quick service order today by telephone 

<fif> 617-547-4005 • 800-892-9230 

ELI HEFFROM & Sons inc. 

139-145 HAMPSHIRE ST. CAMBRIDGE, MA. 02139 
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Fun Puzzler is Educational 
for Adults and Children Alike 

By Carol Kueppers 

Puzzler is a machine language program that generates 
three popular paper-and-pencil puzzles — word search, 
crossword and scrambled word, from lists of words and 
their definitions which you create using the mini-editor 
provided in the program. It comes as a complete package 
and includes a nine-page instruction booklet that is a 
pleasure to use because it details clearly, with a touch of 
humor, how to use the program. The disk (or tape) also 
includes three sample lists so you can go through the 
procedures effortlessly, familiarizing yourself with the 
program functions before moving on to your own puzzle- 
making activities. 

Many of you may already have a puzzle generator in 
BASIC from rainbow's December 1982 issue. In the past 
three years 1 have prepared puzzles for everything from 
personalized birthday cards to vocabulary hand-outs for the 
classes I visit with an "Art Goes to School" presentation. 
These puzzles have been enormously successful, and, in the 
case of the school classes, provide reinforcement of the 
subject matter, but they are somewhat limited. 

Puzzler's word search puzzle generator creates a puzzle 
in seconds, in the dimensions you choose. In addition, it 
allows new choices for the finished product. Young children 
have trouble finding words on the diagonal, so with Puzzler 
they can be eliminated; you can make puzzles for young 
readers using their vocabulary — and they can make puzzles 
for you from the same word list, but including the diagonals. 
You can race to the finish! 



Two- Liner Contest Winner . . . 

This two-line program sorts the filenames on a disk 
into alphabetical order. Back up the diskette first, then 
insert it into Drive and RUN. 

The listing: 

CLEAR4 J3j3j3 : DIMF$ (72): H=0 : FORS=3 
TOll : DSKI $j3 , 17 , S , A$ , B$ : C$=A$+LEF 
T$ ( B$ , 127 ) : K=l : L=H+1 : H=H+8 : FORN= 
L TOH:IFMID$(C$,K,1)OCHR$(255)T 
HENF$ (N) =MID$ (C$,K, 31) :K=K+32 :NE 
XTN : NEXTS : ELSEFORI=lTON-2 : FORJ=I 

TON-1: IFF$ (J) <F$ (I) THENT$=F$ (J) 
:F$(J)=F$(I):F$(I)=T$ 

1 NEXTJ:NEXTI:FORI=N T072:F$(I)= 
STRING$(31,255) :NEXTI : T$=CHR$ (j3) 
: 1=1 : FORS=3T011 : A$=F$ ( I ) +T$+F$ ( I 
+l)+T$+F$(I+2)+T$+F$(I+3)+T$:B$= 
F$ ( 1+4 ) +T$+F$ ( 1+5 ) +T$+F$ ( 1+6 ) +T$ 
+F$ ( 1+7 ) +T$ : DSKO$0 , 17 , S , A$ , B$ : 1= 
1+8 : NEXTS : CLEAR200 : END 

Stephen Hunter 
Athens, GA 

(For this winning two-liner coniesi entry, the author has been sent copies 
of both The Second Rainbow Book Of Adventures and its companion The 
Second Rainbow Adventures Tape.) 



Despite their popularity, these standard word search 
puzzles are a bit primitive, presenting only a matrix of letters 
with a neat list of the requested words beneath. However, 
Puzzler gives you the ability to print definitions instead of 
words. Since you compose the definitions, they can be as 
easy or as difficult as you dare! Now the solver has to think 
up the possible correct word and search for that. Obviously, 
this makes a better hand-out for classrooms since the 
definitions are a summary of the material, but any puzzle 
lover will appreciate the variety. , 

When making crossword puzzles, you'll find the puzzles 
resemble a completed "Scrabble" game, or those found in 
word game books for children. The puzzles interlock at few 
points, so there are few common letters to act as clues in 
the solution. They look easier than they actually are, which 
is something to remember when writing the definitions. The 
puzzle generator, nonetheless, creates puzzles that are a 
great deal of fun to solve. 

You may create lists of words and definitions at any time, 
then save them and use them for the puzzles. When you 
select "compile crossword" from the menu of choices, the 
screen shows which try the program is working on and 
Hashes some symbols across the screen as it works. 1 liked 
this feature a lot, since all too often programs present only 
a blank screen while computations occur and I'm never sure 
if the program is working, or (perish the thought!), has 
vanished into never-never land. 

The generator may not succeed in placing all of the words 
in the puzzle in its first five tries. You then have the option 
of viewing the puzzle, asking it to meet or beat its best 
attempt, accepting the placement as is or entering the 
"endless retry" mode. In endless retry, a list of 30 words is 
placed in only a couple of minutes. For the purposes of this 
review 1 filled the program's buffer with a list of 50 words 
and their definitions, selected endless retry and left for the 
evening. After four hours it had not succeeded, but showed 



Two- Liner Contest Winner . . . 

Rock- Scissors- Paper is a two-line CoCo version of 
the old favorite. 

The listing: 

lj3 EXEC44539:CLS3:C$(2)="ROCK":C 
$ (3) ="SCISSORS" : C$ (1) ="PAPER" : A$ 
="I WIN-" :B$= M YOU WIN-":D$="SCIS 
SORS CUT PAPER" :E$="ROCK BREAKS 
SCISSORS" :F$="PAPER COVERS ROCK" 
: G$="TIE" : PRINT"CHOOSE rOCK-sCIS 
SORS-pAPER "; :EXEC44539 :X$=INKEY 
$:C=RND(3) : IFX$="P"THENX$="Q 
2j3 PRINT:PRINTC$(ASC(X$)-8p) ,C$( 
C) :H$=X$+STR$(C) :IFH$="R 3"THENP 
RINTB$;E$:RUNELSEIFH$="S 1"THENP 
RINTB$;D$:RUNELSEIFH$="Q 2"THENP 
RINTB$;F$:RUNELSEIFH$="R 1"THENP 
RINTA$ ; F$ : RUNELSEIFH$="S 2 "THENP 
RINTA$;E$:RUNELSEIFH$="Q 3 "THENP 
RINTA$ ; D$ : RUNELSEPRINTG$ : RUN 

Meg and Paul Clough 
Houston, TX 

(For this winning two-liner contest entry, the author has been sent copies 
of both The Second Rainbow Book Of Adventures and its companion TIk 
Second Rainbow Adventures Tape.) 
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that its best placement was 36 words. I then selected the 
menu option "meet or beat best" attempt. After 10 minutes 
it had achieved that goal. The instructions do not state the 
present limit on the program, but it appears to be between 
30 and 40 words. It is probably easier, and faster, to edit 
long lists down to a 30-word total to be sure the finished 
puzzle includes all the words you consider essential before 
compiling a puzzle. Real fans can use Puzzler to create a 
framework and add to it manually. 

To print out the graphics of the crosswords, the program 
includes screen dumps for the most popular dot-matrix 
printers. If your printer is not on the list, you can first try 
those listed to see if one works. If none do and you have 
a screen dump program for your printer, you can first print 
out the definitions, save the graphics screen, exit Puzzler, 
load in the graphics screen and the screen dump program, 
and proceed. Although the program worked fine with my 
Radio Shack Line Printer VIII, 1 tested this option and can 
report that it does work. 

However, you might want to take advantage of Color 
Connection's third option, which is to contact them for 
technical advice and customize Puzzler's screen dump 
program for your printer, or send a photocopy of your 
printer manual's bit-image graphics pages and they will 
customize the program for you. I spoke with Color 
Connection and found them friendly, helpful and anxious 
to have their customers enjoy their creations. 

The third puzzle type, scrambled words, simply takes 
your word list and scrambles the letters. All three types 
allow you to print an answer key. 

I created a few puzzles for a group of kids one rainy 
Saturday. They, in turn, thought up puzzles for me — it took 
them a while since they were trying for the obscure, and they 
looked through encyclopedia volumes, history books and 
even Bartlelt's for a couple of quotes. Their completed 
masterpiece was absolutely impossible. To their vast 
amusement, I kept begging for hints and ended up with only 
four correct answers! All of them, meanwhile, had inadvert- 
ently learned quite a bit. I suggest that other families do 
this the same way; your kids will probably also enjoy 
stumping the adults. 

As good as Puzzler is at present, the author, Darren 
Croft, is working on some improvements that will probably 
be finished by the time this review appears. The upgrade 
will permit several previously created lists to be loaded in 
at once, so words and definitions can be selected from them, 
rather than requiring each new list to "start from scratch." 
This effect can be achieved at present by loading the various 
lists into any word processing program that accepts ASCII 
files. You then edit carefully, retain the Puzzler format, save 
your new list and use it for puzzle making. The new version 
will make crosswords that accept more words and will 
include screen dumps for more printers. 

Puzzler is terrific. Adults who love puzzles will have lots 
of fun with your creations — include a couple personalized 
ones with your next get-well card. Families, teachers and 
scout leaders can quickly make up an assortment of puzzles 
to have on hand for a rainy day or that "endless" car or 
plane trip, as well as using these as an educational tool. 

(Color Connection Software, 1080 Buddlea Drive, Sandy, 
UT 84070, 32K disk or tape S29.95) 
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Stay Undercover with the 
CoCo Keyboard Cover 

This will be a short review — just how much can you say 
about a keyboard cover? The CoCo Keyboard Cover is 
made of hard, opaque black plastic with a smooth, shiny 
finish. It fits the Color Computer keyboard even if you have 
installed one of several after-market keyboards available for 
the CoCo. (I have installed a keyboard with keys that stick 
up a bit higher than other keyboards I've seen, and the cover 
fits fine.) There is a decal on the inside of the cover that 
lists some of the most commonly used PEEKS and PDKEs, 
i.e., printer Baud rate, high-speed, hard copy of directory, 
start, end, and execute addresses of machine language 
programs, as well as a chart showing the memory locations 
of the keys. 

This accessory does not take up another outlet on your 
power strip, and it keeps dust off of the keyboard. The decal 
is a nice touch, but to read it, you have to remove the cover 
and find some place to prop it up so you can see it. For 
something so simple, the price does seem to be a bit much. 

(REM Industries, Inc., 9420-B Lurline Ave., Chatsworth, 
CA 91311, S9.95 plus $2.50 S/H) 

— Mark Williams 



CORRECTIONS 



"Trivia Tic-Tac-Toe" (December 1985, Page 69): 

Richard Pitel tells us that some readers with cassette 
systems have reported a problem with the Tic- Tac- Toe 
program. 

Line 220 reads CLOSE 1. This statement closes the 
disk file, and on a cassette system you may get a DN 
Error message. Simply delete Line 220 to take care of 
this problem. If you add a disk drive to your system, 
put Line 220 back in. 



"Letters to Rainbow" (February 1986, Page 7): The 

"Editor's Note" in response to a letter from Brian 
Collins of Waldorf, Maryland ("Computer Animation 
on a VCR") had the commands at the end of the 
instructions transposed. It should read: "When you 
want to record do a motor off. Do a motor on when 
you want to stop." We apologize for being so back- 
ward! 

In our effort to advise you quickly of any revisions, omissions, 
corrections or enhancements to our program listings, these will 
be posted on our new Delphi CoCo SIG as soon as they are 
reported, and will then be printed in the earliest possible issue 
of THE RAINBOW. From the CoCo SIG> prompt, pick 
TOPICS, then INFO ON RAINBOW. 



March 1986 THE RAINBOW 191 



Software Review* 



,VR\ 



Stylo-Pak Sets a New Standard 
for Word Processing 

By Dale E. Shell 

As a reviewer, I have been lucky enough to have had very 
few bad products to review. It is usually easy to write a 
negative review, but when a really outstanding product 
comes along, it's sometimes difficult to convey how good 
a product is. 1 have found one of these products. 

Of all the word processors for the Color Computer, I had 
progressed through five of them before I received Stylo- 
graph. I was happy with each one before I went to the next 
one in line, which I thought better fit my needs. I can still 
see the advantages each one had over the others, but 1 can 
now say, without hesitation, that Stylograph, when teamed 
up with PBJ's Word-Pak, is by far the best word processor 
for the Color Computer. I feel qualified to say this since 1 
have actively used five different processors before this one. 
Stylograph is one part of Stylo-Pak, from Stylo Software. 

You do not have to have an 80-column card to use 
Stylograph; all you need is OS-9. Stylograph comes with 
its own 51-column driver; it also has a driver to support O- 
Pak. I believe the Word-Pak best enhances all of its features. 
It is really nice to see all 80 columns at the same time. This 
is not like the 85 columns some processors say they have 
available. Their 85 columns are used in their "window" 
mode so you can see how things are going to look when 
printed. You can easily read these 80 columns, and it really 
looks professional. It helps bring the CoCo up out of the 
game computer category and into the serious computer 
systems. 

Stylograph has so many features that you will wonder 
how you ever got along without them on your "old" word 
processor. Like many other processors, Stylograph has a 
cursor-based editing system that allows you to work on any 
portion of the text by just moving the cursor to that point. 
It uses many single keystroke commands, which are 
symmetrically arranged on the keyboard to quickly move 
the cursor around the text. The selection of these keys is 
different from the other processors I have used, so yes, there 
is some learning required, but it is well worth it. 

Cursor control includes up, down, left, right, tabs, margin 
positions and any page or specified series of letters or words. 
The display can be scrolled up, down, left or right. This 
feature is not always used with Word-Pak since you can see 
80 columns at a time. Any block of text can be moved, 
copied, duplicated or deleted. Stylograph also has a global 
replace so that some or all occurrences of a given word or 
string of words can be replaced. It includes a "Keyboard 
Function" card in the manual. This card can be placed in 
a convenient location for quick reference until you get used 
to all the functions available. 

Dynamic screen formatting is a strong feature of 
Stylograph. Dynamic screen formatting means the text is 
immediately formatted on the screen in the same way as it 
appears on the printed copy. The text display is continu- 
ously updated to reflect any changes. This is one of the 
impressive features that usually only appears on very 
expensive systems. This is much better than the way some 
processors use a "window" so you can see how the printed 
page will look. Some do not even have the window. With 
Stylograph, if you center a section of text, it is immediately 
centered on the screen; if you right-hand justify, that is 
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reflected on your screen. Any of the text or individual lines 
may be centered, left justified and/ or right justified. You 
truly have "what you see is what you get." Even margins 
can be set and changed at any place in the text with simple 
commands that control the line length, left margin, headers 
and footers. Of course, wrap-around is used, and the 
headers and footers are also inserted, so the operator always 
knows what portion of the page is being worked on. 

Stylograph allows modification of characters or words in 
a variety of ways. It uses reverse video such that each time 
you "boldface" a word, the screen displays the word in 
reverse video. This enables identification of any character 
modifications easily and quickly when scrolling through 
text. 

Another feature I really like is the "page break." When 
you get to the end of a page while entering text, a dotted 
line goes across the screen to let you know where each line 
is relative to the new page. A manual page break is available 
so you can eliminate orphans and widows. These are single 
lines of a paragraph that print on a different page than the 
rest of the paragraph. 

Along with boldface, Stylograph lets you take advantage 
of all the features your printer is capable of doing. Some 
of these include: expanded print, condensed print, 1.5 line 
spacing, superscript, subscript, underline, overline or any 
combination. Also, true proportional spacing is supported 
on the specialty printers. Your printer may not be able to 
use all the options available, but all your printer's options 
are probably supported by Stylograph. A configuration 
program is included that allows you to customize Stylo- 
graph for your printer. Stylograph comes configured for the 
most popular printers, and you can have it default to your 
printer. If you do not see your printer in its table, it is very 
easy to add your printer to its list. (I had to do this with 
my Riteman Plus.) As said before, you can have Stylograph 
default to your printer, but you also have the option when 
you call up Stylograph, to call up any of the 12 possible 
printer drivers. 

I am always concerned with the lack of good documen- 
tation that comes with a program. This manual consists of 
well over 200 pages. While the number of pages is not an 
indication of how well the program is documented, the 
pages of this manual are organized and include a lot of 
information. Most parts of the manual are designed so very 
little knowledge of computer systems is needed to use it 
effectively. Some knowledge of the OS-9 operating system 



Hint . . . 

Slow Scrolling 
through Orange 

Here's a powerful little POKE that slows your 
scrolling by creating a horizontal LIST. Type POKE 
359 , S3 and you'll see what we mean. Add a colon (:) 
and SCREEN0,1 and you'll be slow-scrolling across an 
orange screen. To return to the green screen at full tilt, 
just type POKE 359,126. 



Now! 500 new programs for the Tandy 1000! 

For Your TRS-80 Color Computer 

Apple - Atari ■ Commodore - TRS 80 I, III, 4 & Color - IBM PC Jr. - Tandy 1000 

New Educational Programs for ~ 

Grades K-12 and Adult Self-Studies . 

I 

32 Programs Now Available on Disk 
for TRS Color Computers 
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Interactive Tutorial Programs for Home or Classroom Use 

Over 1000 programs for your selection with 32 now available on disk for the Color 
Computer and 500 now available for the Tandy 1000. 



"We're Your Educational 
Software Source" 

Subject No. of Programs 

Reading Development 256 (4 on disk) 
Reading Comprehension 48 (4 on disk) 
Mathematics 128 

Algebra 16 (16 on disk) 

History _ 32 (4 on disk) 

Spelling 16 

Government 16 

Physics 16 (4 on disk) 

16 Programs in each 
of the following: 
Children's Tales - Carpentry - Electronics 
Health Services - Office Skills - Statistics 
First Aid/Safety - Economics - Business 
Accounting - Psychology • MUCH MORE! 

Send for our Iree catalog ol over 1000 Dorsett educa- 
tional programs lor Atari, TRS 80, Apple. IBM PC Jr., 
Commodore. Tandy 1000. etc. 



Apple II, TRS 80 I, III, & 4, and 
Commodore 64 computers require 
respective conversion kits (plug-in board 
and stereo cassette player), S99.00. Atari 
400/600/800/1200 computers require the 
Atari cassette recorder and the Dorsett 
4001 Educational Master Cartridge, 
$9.95. For the IBM PC Jr. a cassette 
adapter cable and a good cassette 
recorder are required. The Tandy 1000 
requires the Dorsett M1001 speaker/PC 
board kit, $69.00, and a standard 
cassette recorder. A Radio Shack 
CCR-81 or CCR-82 is recommended. 

CASSETTES: $59.90 for an album con- 
taining a 16-program course (8 cassettes 
with 2 programs each); $8.80 for a 
2-program cassette. 

DISKS: $14.95 for a one-program disk; 
$28.95 for two disks; $48.95 for four 
disks. All disks come In a vinyl album. 

Dealer Inquiries Welcome 



Dorsett Educational Software features: 

• Interactive Learning 

• User Friendly 

• Multiple Choice and Typed 

• Program Advance with Correct Response 

• Full-time audio narration (Cassette 
Programs Only) 

• Self-Paced Study 

• High Resolution Graphics 

• Easy Reading Text 

For more information, or to order call: 

TOLL FREE 1-800-654-3871 

IN OKLAHOMA CALL (405) 288-2301 
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Educational Systems, Inc. 

Box 1226, Norman, OK 73070 




HOW DO YOO SHARE A RAINBOW? 



It's simple — 

Give a rainbow gift 

certificate . . . 



Share the rainbow with your 
friends by giving a gift subscription 
to the premier information source 
for the Color Computer. Then, each 
month, all year-round, they'll enjoy 
the spectrum of rainbow programs, 
articles and information written 
exclusively for their CoCo! 

First, they'll receive a handsome 
card announcing your gift. Then, 
they'll be reminded of you each 
month when they receive up to 300 
pages of the rainbow — including 
as many as 24 programs, 15 regular 
columns and up to two dozen pro- 
duct reviews. 

When you give a rainbow gift 
certificate, you'll also be safeguard- 
ing your own collection. No more 
frantic searching for those back 
issues you've lent to a friend. 

Give a rainbow gift certificate and 
let your friends in on something you 
already know — the rainbow is the 
perfect companion for the Color 
Computer! 



Please begin a one-year (12 issues) gift subscription to 

THE RAINBOW for: 

Name . 



Address 
City 



.State 



ZIP 



From: 

Name 



Address 
City 



.State 



ZIP 



□ My payment is enclosed 

Bill to: □ VISA □ MasterCard □ American Express 

My account # Exp. date 

Signature 

Mail to: 

Rainbow Gill Certificate, The Falsoft Building, P.O. Box 385, Prospect, KY 40059 

To order by phone, call: (502) 228-4492 



Subscriptions to the rainbow are $31 in the United States; U.S. $38 in Canada. The surface rate 
to other countries is U.S. $68; the air rate, U.S. $103. Kentucky residents add 5% sales tax. U.S. 
currency only, please. All subscriptions begin with the current issue. Please allow 5 to 6 weeks for 
delivery. In order to hold down non-editorial costs, we do not bill. 



is helpful to copy the files needed to set up Stylograph, but 
normally it takes a person with reasonable typing skills only 
a short time to start using the program competently. Once 
Stylograph is installed on a system disk, almost anyone can 
be using it in no time. 

The manual has a three-lesson tutorial, which is broken 
into four parts; the best way to learn to use Stylograph is 
to sit down with your CoCo and practice all the commands 
as they are explained in the tutorial. The exercises are 
designed for the person who is inexperienced with compu- 
ters and who will be using the word processing program for 
the first time. A person with even a little OS-9 experience 
can go through the tutorial in just a few hours, but take 
your time and review the functions after using them. 

The minimum hardware requirements include a 64K 
CoCo, one disk drive, a TV screen and a printer. While this 
allows you to run Stylograph, you have to do a lot of disk 
swapping and you are limited to a 5 1 by 24 screen. The ideal 
configuration adds another disk drive, a standard screen 
monitor and an 80-column card — this is what I used. This 
configuration turns the Color Computer into a viable desk- 
top computer. I am constantly amazed at the CoCo's ability 
to grow and expand. Just look at the computer systems that 
came along at the same time the CoCo first appeared — 
they are not around anymore and the CoCo continues to 
get better. 

Stylo- Pak includes Stylograph, Mail Merge and the 
Spelling Checker. Mail Merge lets you conveniently merge 
variables such as names, addresses and dates at printout 
time for form letters. It also allows for breaking large files 
into smaller, more manageable blocks so they can be 
appended together at printout. Page numbers remain 
consecutive and headers and footers are automatically 
retained. The Spelling Checker offers a dictionary of up to 
42,000 words. Words not found in the main dictionary or 
the supplementary dictionary may be marked for later 
editing, skipped, added to the supplementary dictionary or 
corrected on the spot. This is where my only complaint of 
Stylo- Pak comes in. After a suspected word is found, if you 
want to correct it, you have to enter the word and make 
sure it is spelled correctly. Why do you have to get another 
dictionary to look up a word when you already have one 
in your computer? 1 would like to see a "look-up" option 
that can be accessed at the time the text is being reviewed. 

Even with the minor discrepancy, Stylo- Pak is a very wise 
investment. When teamed up with PBJ's Word- Pak or 
Word- Pak II, Stylo- Pak is, without a doubt, the best word 
processing system for the Color Computer and raises it to 
new heights in the serious world of computing and word 
processing. It sets a new standard that other word proces- 
sors will be measured against, and at this point, there are 
none that can compare. As you probably guessed, I give it 
my highest rating, and 1 had to create a new level to do that. 

Stylo- Pak is available for OS-9 and is also available for 
FLEX. Stylograph is available alone forS99.95, Mail Merge 
and Spelling Checker for S59.95 and $69.95, respectively, 
or you can get all three in Stylo-Pak. When you first see 
Stylograph, be ready to dump the word processor you are 
now using. 

(Stylo Software, Inc., P.O. Box 916, Idaho Falls, ID 83402, 
OS-9 or FLEX, disks S199.95) 
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Calculating Parts Per Million 
Does the Figuring for You 

Applications are a lot less fun than utilities or even games, 
but their availability may mean a given computer system 
is going to stay around awhile. If so, CoCo is blessed. 

Calculating Parts Per Million is a program that deter- 
mines how much fertilizer to add to a given volume of water 
to achieve a specified ratio of parts per million. Its 
applicability covers the entire agricultural range, from the 
large farming business to the home gardener wondering how 
many tablespoons of fertilizer to put in a bucket of water. 
The arithmetic is simple enough, but tiresome to figure by 
hand, and such a program as this may be exactly what will 
simplify your day. 

The program occupies 273 lines of BASIC and a small data 
file. In use, it is very simple. You are prompted at every stage 
and the documentation walks you through the whole 
program, step by step: whether you are using a tank or 
injector system, how much water is being used (less than 
10 gallons affords you the option of seeing the amount of 
fertilizer to add expressed in tablespoons rather than 
pounds), how much nitrogen, phosphorus and potassium 
(in percentages, such as 20-10-20) for a number of fertilizers 
(as many as will be used in the mix) and desired parts per 
million of water. The program then does the necessary 
calculations and tells how much fertilizer to add. 

Shortcomings? There is not room for many, really. It is 
irritating to have the program take you back to its sign-on 
message with any incorrect entry, wiping out everything that 
has already been entered. A space added before the word 
"tablespoons" in Line 1120 would make the screen 
presentation a bit more readable. However, this is an early 
version of the program, and these are precisely the kinds 
of annoyances that tend to disappear in the release versions. 

The manual is one page of dot-matrix printout containing 
almost all you need to know. An exception appears under 
the heading "PPM" (Parts Per Million), where anyone 
unfamiliar with this concept is advised to "call their county 
agricultural agent for information concerning this." I 
suppose it would be fair to assume anyone looking for such 
a program as this would know what PPM stands for. 

(Green Horizons, P.O. Box 768, Mooresville, NC 28115, 
disk S17.95) 

- R.W. Odlin 
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Go for the Gold in Fast 
and Furious Gold Runner 

I'm sure you have heard of the "computer slump" and 
may have become concerned, as I have, at the situation. 
What does this mean to Color Computer owners? How will 
it affect our purchasing power and ability to buy good 
software? After some careful consideration, I came to the 
conclusion that although the computer market is very 
complex, one of the major drivers of this slump is the 
maturation of the consumer. He has become a much more 
wary purchaser of both hardware and software. One thing 
the slump creates is a "buyers' market," which should result 
in better quality products for lower prices. With this preface, 
I'll describe my impression of a new CoCo graphics/ arcade 
game called Gold Runner. Remember that under the current 
conditions, only a very good product is likely to succeed. 

Gold Runner was produced by Tom Mix Software, which 
has developed some of the more popular entertainment 
programs for the Color Computer. These include The King 
and Trap/all, among others. Well, Gold Runner lives up to 
this reputation for quality software. 

Action in Gold Runner is fast and furious, but the game 
is simple. You operate a stickman around a vertical playing 
board of ladders, ropes and brick walkways, picking up 
blocks of gold. There are a few slight complications. Several 
guards chase you and, if caught, you lose a man. Also, there 
is an occasional invisible trapdoor that causes you to fall 
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FOR .5.00 - 
REFUNDABLE WITH 
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* GET "PICTURE PERFECT" FULL-PAGE PRINTOUTS EVERY TIME! 

» "PERFECTLY SltlPLE" TO OPERATE - "SIMPLY PERFECT" RESULTS! 

» "PERFECTLY COMPATIBLE" WITH ALL DOT MATRIX PRINTERS' 

* GET "PERFECT CONTROL" OFl HEIGHT, WIDTH, POSITION, 

BAUD RATE. DOT DENSITY, NEGATIVE IMAGES. ETC. 

* THE "PERFECT SOLUTION" TO VDUR GRAPHICS PRINTINS NEEDS! 

♦ ONLY *2S.OO ON DISK OR: ~T|=*F*E ♦ 



CALL NOW FOR FREE INFORMATION <41S) 347-7337. OR WRITEl 
HAWKES RESEARCH SERVICES, B39 STANFORD AVE, OAKLAND, CA 9460B 
YOUR PERSONAL CHECK IS WELCOME' SHIPMENT WITHIN 48 HOURS! 

ADD «3. 00 SHIPPING ON ALL ORDERS. CA. RESIDENTS ADD 5ALES TAX 



through the brick walkway. This may confuse the stickman, 
causing him to get caught. Fortunately, there is a tool to 
battle the guards. You can blast holes into the walkway, 
which traps the pursuing guards, or this can be used to drop 
the stickman to a lower level, eluding capture. Sometimes 
a gold brick is buried in a walkway and the only way to 
get to it is to blast a hole, then jump in. There is some risk 
that the hole will close and crush the stickman if you are 
not fast enough. Another complication arises from the need 
to steal gold blocks away from the guards, who sometimes 
carry them. Your stickman cannot touch a guard, so the 
strategy in this situation is to trap the guard in a hole that 
you blast and take the gold away. 

Gold Runner is a multilevel game. Once all the gold 
blocks have been collected, including those in possession of 
the guards, your stickman can climb up the tallest ladder 
to the next screen. All together there are over 25 screens, 
with increasing levels of difficulty. If you should complete 
all the screens, you win the honor of starting over, this time 
with the challenge of two more guards in hot pursuit. 

Gold Runner is a complete arcade game, with high score 
saved to disk, keyboard or joystick entry, and pause and 
restart as well as built-in voice sound. Unfortunately, I 
cannot comment on the sound feature because it requires 
the Radio Shack sound module and I don't have it. The 
game is great without it, so it must be even better with the 
sound module. The program is written in assembly language 
and requires 64K. of internal memory. 

My only minor complaint about the game is the slow 
drawing and erasing of new screens. The screen is drawn 
in a circular fashion, like looking through an ever increasing 
iris diaphram. This technique gives a nice effect, but it is 
easy to tire of after a short time. 

In summary, Gold Runner is a well-developed arcade 
game that is fun to play. It's at the quality level and price 
1 believe is needed to survive the computer slump. 1 
recommend this product to the arcade game enthusiast or 
anyone looking for a fast-action, well-written game for the 
Color Computer. 

(NovaSoft, 4285 Bradford N.E., Grand Rapids, MI 49506, 
requires 64K, tape S14.95, disk S17.95) 

— Tom Szlucha 



Hint 



Formatting Diskettes 



Some CoCo users have reported problems with 
formatting more than one disk in succession. The 
CoCo uses a technique called "write precompensa- 
tion" on the more critical inner tracks of a disk; for 
some reason, Disk BASIC doesn't turn off the feature 
after a DSKINI is completed. If you need to format 
more than one disk at a time, enter POKE 113,0 and 
press the Reset button after each disk. 
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Marble Maze Presents a 
Challenge for All Ages 



I'm afraid this is going to reveal my age, but my first 
exposure to the subject of this review. Marble Maze, was 
not the electronic arcade version of the game, but its 
mechanical precursor, called "The Amazing Labyrinth 
Game." The "Labyrinth" game was made of wood and had 
a steel marble that was rolled around a maze using two 
knobs to tilt the playing surface. If you weren't careful, the 
marble would drop into one of the holes drilled in the board 
and you had to start over again. 

This classic game has been converted into an arcade game 
for the Color Computer by Diecom Products. The basic 
elements of the original mechanical game have been 
retained, in that there is a marble and a maze, but the 
capabilities of the CoCo have allowed the programmer to 
add some interesting variations. Instead of gravity, the 
marble is controlled by the left joystick. The maze has been 
enhanced to be a multilevel game, where the goal is to "roll" 
your marble to the finish line in the shortest time possible. 

As each level is completed, you are transported to a more 
advanced level, with each maze becoming more difficult. 
Dave Dies, the programmer, has added a few challenges to 
make the game more interesting. 

First, if you aren't careful, your marble can fall off the 
edge of one of the mazes. Depending on the height of the 
drop, the marble will either be stunned or cracked. Then 
there are the "monsters of the mazes." The Marble-eaters 
are creatures that look like little Slinkies. They move end 
over end, wandering around the board waiting for a chance 
to eat a marble. Actually, they seem to be docile creatures 
until a marble bumps into them, then they jump into the 
air, land on your marble and eat it. 

There are also the mysterious Acid Puddles that move 
around the board, shrinking and expanding as they go. If 
you roll your marble into one of these, it dissolves. Electric 
Snakes will also keep you on your toes as they slither around 
the maze. Unlike the Marble-eaters, these move quite 
quickly, but being touched by one also causes your marble 
to dissolve. 



One-Liner Contest Winner . . . 

This one-liner is an example of a budgeting pro- 
gram. 

The listing: 

17 j3 DIME (12) :F0RX=1T012:PRINT"EA 
RNINGS FOR MONTH" X; : INPUT E(X):N 
EXT : PMODE4 : SCREEN1 , fS : PCLS : FORX=l 
T012:FORY=pTO E (X) /10 :LINE (Y, (X- 
l)*16+4)-(Y, (X-l)*16+12) ,PSET:NE 
XT Y,X:EXEC44539:CLEAR:GOT017^5 

Richard A. Sherman 
Deposit, NY 

(For this winning onc-lincr contest entry, the author has been sent copies 
of both The Second Rainbow Book Of Adventures and its companion 77k- 
Second Rainbow Adventures Tape.) 



At higher levels, you are greeted by moving walls and 
transporter squares that move your marble elsewhere on the 
board (not necessarily where you want to go, just else- 
where). 

One particular feature I like is that even if you get a little 
sloppy and your marble suffers as a result, the game is not 
over. Your marble is reincarnated at its last safe spot and 
the game continues. Each player is given a period of time 
to complete each maze. As a maze is completed, bonus 
seconds are given, which are used on the next level. The 
game is over when your time is up. The more skilled player 
will complete each level more rapidly, as it also takes time 
to get eaten and reappear on the board. 

Marble Maze is a well-programmed game. The three- 
dimensional boards are well drawn. The control of the ball 
is very realistic, with the ball having a proportionate amount 
of inertia depending on the speed of the marble. The lower 
levels of the maze are easy enough for anyone, with 
adequate challenges for more advanced players at higher 
levels. 

If you are good enough and have the disk version, you 
can enter your name, or appropriate alias, on the score- 
board section, which keeps track of the top six players. 

If you are searching for a challenging CoCo game for all 
ages and skill levels, Marble Maze could be a ball. 

(Diecom Products, 6715 Fifth Line, Milton, Ontario, 
Canada L9T 2X8, requires 64K ECB, tape or disk S29.95) 

— Bruce Rothermel 
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Kellynews Vol-3 is now available and 

contains news, hints, programs and articles 

(rom the crew at Kelly Software. We are 

Canada's largest national distributor of 

Color Computer products and we stock all 

the latest games, utilities, simulations and 

business programs. We encourage all 

Canadian Color Computer owners and 

Dealers to send for our FREE catalog 



Kelly Software Distributors Ltd. 

P.O.Box 11932 

Edmonton. Alberta T5J 31.1 

Tele (403) 421-8003 
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Super Directory Catalog 
Keeps Track of Disk Files 



Super Directory Catalog is one of the latest software 
entries designed to help you keep track of all those disk files. 
To use this program you need at least 32K and either Disk 
BASIC 1.0 or 1.1. Super Directory Catalog is a very easy 
program to use. It is written in machine language and is 
menu driven. 

The program has several menu options. "Read directory" 
reads the directories of each of your disks. Before each 
directory is read, you are asked for a directory name. This 
can be up to four characters long and is not written to the 
disk. A 32K machine will handle up to 1,700 filenames and 
a 64K machine can handle a whopping 3,800 filenames. 
"Save catalog" saves a master directory of the filenames, 
which can then be loaded with "Load catalog." "Print 
catalog" prints a catalog of your disk files, with up to 208 
filenames printed four across on a page. A neat feature I 
haven't seen on other programs of this type is that at the 
bottom of each printed page, two filenames are printed in 
brackets. They indicate the first and last filenames on that 
page. The program can be ended by selecting "end." 

Selecting "maintenance" takes you to a second level menu 



of the next six functions. "Sort" will sort the filenames in 
alphabetical order. The sort is quite fast — it sorted over 
800 filenames for me in less than three minutes. The sort 
time increases exponentially, as the number of entries 
increases. It takes about 60 minutes to sort 3,850 filenames 
according to the documentation. The sort function is 
somewhat disappointing, though. Since it only does an 
alphabetical sort, you can't, for instance, get a printout of 
all your UASlC-only programs. This ability would have been 
a nice addition. "List filenames" displays all the filenames 
in the buffer to the screen. Twenty filenames at a time are 
displayed two across on the screen. "Delete filenames" 
allows you to update your catalog by simply deleting all the 
filenames on a particular disk and rereading the directory 
of that disk. This function deletes all filenames assigned to 
a disk, not individual filenames. "Selective search" helps 
you quickly locate a particular filename or all the files on 
a certain disk. All you have to do is type in all or part ot 
the filename or the entire directory name. "Set default drive" 
allows you to select any drive from 0-3 as the default. "Clear 
buffer" clears all the data in the buffer. 

Super Directory Catalog is a good piece of software that 
does exactly what it says it will do. I do feel the price is 
a little high, though, for what the program does. I 
recommend it, but for the price 1 think we deserve a little 
more. 

(Mctalsoft, P.O. Box 7796, Independence, MO 64054, 
S24.95 plus $2 S/H) 

— Michael Hunt 
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SOLDERLESS UPGRADE KITS 



With easy-to-follow instructions 

64K FOR E BOARO $39.95 

64K FOR F BOARD $29.95 

64k for coco?* S29.95 

'All Korean moods require one solder ioihI 



NOTE All ICs used m our kits are f<nt quality '50/VS 
prime chips antJcarry one lull year warranty 



ASSEMBLY LANGUAGE 

COLOR BASIC UNRAVELLED S17.95 

EXTENDED BASIC UNRAVELLED $17.96 

DISK BASIC UNRAVELLED S17.9S 

ALL 3 BOOKS 0NLYS39 9S 

THE FACTS IBOOKI $14.95 

ULTRA 8QC DISK EDITOR ASSEMBLER $2495 

BUG OUT S THE ORACLE $1495 

ALL 6 ITEMS ONLYS59 96 



MURA MINI MODEM* 
& AUTOTERM** 

$54.95 (disk add S5.00) or $29.95 each 

C0C0 Cable $9.95 

'Direct connect 300 Baud manual answer/ 

originate with power supply & phone cable. 

"Newest version 



COCO MAX I taps only 564.95 

COCO MAX II disk only $74.95 

BRANCHING CABLE 527.95 

DS-69 DIGISECTOB wllh lap* or disk 1139.95 

HJL-57 KEYBOARD S69.9S 

PBJ WORK PAK II 5125.00 

THE INTRONICS EPROM Programmer 

Program Up to 64K Eprom 5139.95 

DATARASE (Eprom Eraser) S39.9S 

2764 HIGH SPEED COMPATIBLE $5.95 

27128 HIGH SPEED COMPATIBLE 57.95 

ROM PACK PC BOARD 

will) case lor 27xa 59.95 

TEAC 558 DS/DD Hall Helghl Drive 5109.95 



CASE AND POWER SUPPLY 549.00 

NEW JAM OISK CONTROLLER 

wllh J Doi 1.2 5129.00 

DISKETTE CAROUSEL 524.95 

ZENITH ZVM-1 23 GREEN $99.00 

ZENITH ZVM-122 AMBER $109.00 

VIDEO PLUS $24.95 

VIDEO PLUS IIC 534.95 

VIDEO PLUS IIU 534.95 

REAL TALKER I 

Wllh 3 talking gomes 549.95 

REAL TALKER II 

Wllh 3 talking games 554.95 

CRAFT JOYSTICK 524.95 



Pen Pal 

The New 64K disk 

integrated software package 

S59.95 



Take a closer look. . 

TAPE 
DYNACALC 
PROCOLOR FILE 20 
MASTER DESIGN 

TELEWRITER 64 $39.95 

SUPER SCREEN MACHINE $35.95 

RAINBOW SCREEN MACHINE $23.95 

PEN PAL 

AUTOTERM $31.95 

ADOS 

SUPER BACKUP UTILITY 
THE PEEPER WITH SOURCE 524.95 

GRAPHICOM 



Introductory Offers 



32K GAMES 



P5I MUSTANG 
Optional CaDle 



$23.95 



Number Jack 

The HJL 

Numeric Key Pad 

S79.95 



OISK 

$74.95 SAILOR MAN (64K) $23.95 $27.95 

$49.95 WORLDS OF FLIGHT $23.95 $26.35 

$29.95 DRAGON SLAYER 523.95 

$47.95 DRACONIAN $22.95 $24.95 

$36.95 SR-71 $23.15 524.75 

$26.95 BUZZARD BAIT 522.35 516.95 

$64.95 GALAGON 516.95 518.95 

539.95 LUNAR ROVER PATROL 516.95 $18.95 

527.95 MS GOBBLER 516.9S 518.9S 

$44.95 LANCER $16.95 518.95 

$26.95 CUBIX S16.95 518.95 

517.95 FROGGIE $16.95 518.95 

SPACE PAC $21.95 $21.95 

EDUCATIONAL PAC $19.95 $19.95 
$27.95 GHOST GOBBLER ROM PACK (16K, $19.95 

TREASURY PAC 529.95 529.95 



WE PAY SHIPPING in the United States, Canada & Mexico. 
Overseas please add 10%. IMN Residents add 6% sales tax.) 
We accept Visa. Mastercard, check or money order, U.S. 
funds only for foreign orders, C.O.D. please add $2.00. 
(USA only). 



Send to: 



SELECTED SOFTWARE 

P.O. Box 32228. Fridley, MN 55432 

24 HOUR ORDER LINE 612-757-2439 

INFORMATION 612-757-1026 11 1 A.M. -2 P.M. C.S.T. 

SAME DAY SHIPPING BEFORE 1 P.M. C.S.T. 
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Good for Beginners, Don Pan 
is a Moderately Paced Game 

Don Pan is the latest addition to the list of ROM Pak 
games for the Color Computer from Tandy. It's a gentle, 
moderately paced joystick game, just right for small 
children. 

The game opens showing a girl holding a balloon. 
Magically, the balloon turns into a puffer fish and you play 
with the puffer fish for the rest of the game. I'm no expert 
in marine biology, but it seems these puffer fish need to 
replenish their supply of air regularly, or else they die. Your 
job is to capture enough balloons to keep your fish supplied 
with air, all the while avoiding the dangers that can puncture 
the fish. 

The fish bounces up and down through the air, under 
control of your joystick. Balloons and birds float by: The 
balloons give you air and the birds puncture you. You can 
escape the birds by maneuvering around them or by blowing 
a puff of air. which makes them disappear. Points are scored 
by capturing the balloons and by blowing away the birds. 

There are three screens. On the first screen, you're floating 
over an attractively drawn city scene. After scoring around 
2,500 points, you go to a second screen where you fly above 
an ocean. Sharks occasionally jump out of the water and 
try to puncture you. On the third screen, where you go when 
you've scored about 7,000 points, you're over a seashore 
where you must avoid the crabs. 



Submitting Material 
To Rainbow 

Contributions to THE RAINBOW are welcome from every- 
one. We like to run a variety of programs which will be 
useful/helpful/fun for other CoCo owners. 

Program submissions must be on tape or disk and it is 
best to make several saves, at least one of them in ASCII 
format. We're sorry, but we do not have time to key in 
programs. All programs should be supported by some edi- 
torial commentary explaining how the program works. 
Generally, we're much more interested in how your sub- 
mission works and runs than how you developed it. Pro- 
grams should be learning experiences. 

We do pay for submissions, based on a number of criteria. 
Those wishing remuneration should so state when making 
submissions. 

For the benefit of those who wish more detailed infor- 
mation on making submissions, please send an SASC to: 
Submissions Editor, THE RAINBOW, The Falsoft Building, 
Prospect, KY 40059. We will send you some more compre- 
hensive guidelines. 

Please do not submit programs or articles currently sub- 
mitted to another publication. 



All through the game, you have to keep track of your air 
supply with the help of a gauge at the bottom of the screen. 
The air supply goes down as you fly around and whenever 
you "puff" at a bird. If the air supply gets too low, you can't 
puff at the birds until you've captured a few balloons to 
build up the air supply again. If you run out of air 
completely, you lose one of your three lives. You also lose 
a life if you're punctured. 

Overall, the game is carefully programmed with attention 
to detail. Color and sound are used well throughout. One 
touch I like: When you're puffing at a bird, you don't have 
to be exactly lined up with the target — a near miss will 
do. This feature makes the game more attractive to younger 
players. 

The game requires 1 6K and a joystick, and the instruction 
manual recommends a color TV — it really isn't enjoyable 
with a black-and-white set. For example, it's very difficult 
to see the sharks on Screen 2 on a black-and-white TV. 

My children, ages 6 and 9, find many arcade games just 
too hard for them, requiring more speed and coordination 
than they can manage, but they found Don Pan a lot of 
fun and a challange they could meet. If you're looking for 
a beginning level joystick game, one that even young 
children can enjoy, try out Don Pan at your local Radio 
Shack store. 

(Tandy Corp., available in Radio Shack stores nationwide, 
S19.95) 

— David Finkel 



Two-Liner Contest Winner . . . 

This two-liner is a simple subtraction flashcard 
program. 

The listing: 

lpj& R-0 : CLS : PRINT@2 34 , "SUBTRACT" 
:PRINT§297,"FLASH CARDS" :EXEC445 
39 : FORQ=1TO10 : CLS : A=RND ( 20 ) : B=RN 
D (2/8): IF A>B THENPRINT@24/3 / USING 
"##";A:PRINT@271,"-";:PRINTUSING 
" # # " ; B : C=A-B : ELSEPRINT§240 , USING 
"##";B:PRINT§271,"-"; : PRINT/USING 
"##" ; A: C=B-A 

1)81 PRINT@303,"===":PRINT@334,"" 
;: INPUT D:IFD=C THENPRINT@448, "c 
orrect" : SOUND2/3/3 , 1 : R=R+1 : EXEC445 
39:NEXT:PRINT@456,R:EXEC44539:GO 
T01/3J2 : ELSEPRINT@448 , "wrong" : SOUN 
Dlj3,4:EXEC44539:NEXT:PRINT@448," 
correct " ;R:EXEC44539 :GOTO1J30 

Richard A. Sherman 
Deposit, NY 



(Kor this winning (wo-lincr contest entry, the author has been sent copies 
of both The Rainbow Hook Of Simulations and its companion The Rainbow 
Simulations Tape.) 
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IF YOU HAVE ... 

• a terminal (or terminal program) 

• one or more disk drives (40 track or larger) 

IF YOU CAN ... 

• make or acquire cables 

• make or acquire a power supply 

• connect cables for terminal, drives, and 
power supply 

THEN YOU CAN ... 

• Step up to a 68000 UniQuad System 

for only $995 

UniQuad 1 $995 

68008 processor running al 8 Mhz 

4 serial ports 

2 parallel ports 

supports 2 floppy disk drives 

SASI bus for connection to hard disk drives 

128K bytes of RAM (expandable to 51 2K bytes) 

up to 32K bytes of ROM 

UniQuad 2 $1495 

68000 processor running at 10 Mhz 

4 serial ports 

2 parallel ports 

supports 4 floppy disk drives 

SASI bus for connection to hard disk drives 

I/O expansion bus 

512K bytes of RAM (expandable to 1 Megabyte) 

up to 128K bytes of ROM 

Both UniQuads come complete with: 

OS-9/68000, BASIC09, STYLOGRAPH, and DYNACALC 

HAZELWOOD COMPUTER SYSTEMS 

907 E. Terra, OTallon, MO 63366 314-281-1055 
MasterCard and VISA accepted 
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SDOS: a Powerful, Low-Priced 
Package Perfect for the Hacker 

By Tom Carl 

I had looked forward to an evening of computer hacking 
with SDOS, a new software package from Software 
Dynamics, distributed by Computer Systems Distributors. 
Reading the manual makes it clear that SDOS, at least in 
concept and original form, was born on minicomputers 
and/ or mainframes. Thus SDOS brings some very sophis- 
ticated techniques to the CoCo. It is definitely not for the 
beginner. 

When I opened my reviewer's package from RAINBOW, 
out tumbled four diskettes, several pages of product 
promotion and seven manuals. It looked like I would have 
a hard time complaining about lack of documentation. I 
highly recommend that you start by reading the small 
manual, labeled "CoCo SDOS," cover to cover. It has a 
complete description of the keyboard modifications, which 
are actually very simple. The '@' key is used for erase (or 
rub out character), so the arrow keys can be reserved for 
full screen editing. The BREAK key is "escape" and the 
CLEAR key is "control." You also get auto-repeat on all keys 
and type-ahead (buffered input), with SHIR"/ CLEAR being 
the upper-/ lowercase toggle and SHIFT/ @ being the '@' key. 
Therefore, you can get the full 96 ASCII codes and some 
other powerful keyboard features lacking in Disk BASIC. 
This little manual also tells you to start with RUN "SD05" 
and warns of a 30-minute delay if you don't have your 
required registration number, which can be obtained by 
phone or mail from Computer Systems Distributors. 

The SDOS formatter is run from a Command File. There 
is a command line interpreter (CLI) that has a vocabulary 
of some 35 words (such as files, list, time, do, dismount, 
etc.), and any word not in its vocabulary is assumed to be 
the name of a program you want the system to load from 
the disk and run. For example, if you type in FRED, the 
system will find a program called FRED and run it, or 
announce "no such program." As an alternative to typing 
in commands to the CLI, you can set up a Command File 
and put that Command File in charge of the computer by 
typing DO XXXX.DO, where XXXX is a filename. For those 
familiar with Data General Mini or IBM microcomputers, 
even the nomenclature of this feature will ring bells. SDOS 
also has a related feature similar to IBM's AUTOEXEC- 
.BAT, which uses INITIALIZE. DO as a Command File 
that the Bool program automatically puts in charge of the 
computer at start-up time. The SDOS command to create 
a Command File is LIST CONSOLE: TO INITIA- 
LIZE. DO. You may also note that naming, initiating and 
releasing devices, such as LPT: DO: CONSOLE: DL, are 
similar to larger computer systems. 

I took the Utility disk and typed in DISMOUNT D0: so I 
could remove the System disk. The screen reported the 
number of I/O uses, and I was shocked to see that over 10 
percent of all the reads had produced read errors, but, 1 had 
seen no apparent operational problems. I typed FILES Dl: 
to look at the disk I had created, and it appeared to be OK, 
so I proceeded with the formatter Command File. It did its 
job just fine to the point of asking me, "Format another 
disk? Y/N." When I answered 'N\ I got an Error 1045 (disk 
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"ead error), then a steady stream of Error 10 18s (system 
ncompatible), and neither control/C nor escape could 
-ecover the system. I was ready to cry, for this meant waiting 
inother 30 minutes for SDOS to come up again. 

At least I had time for a cup of tea and some research 
nto my disk read errors. I was using a 64K CoCo (required), 
i Radio Shack controller and two TEAC drives (a single 
drive will work but is strongly not recommended). The read 
;rrors and the slowness of the system suggested some type 
jf disk speed problem, and my review snowed that both 
SDOSDISKINIT and SDOSDISKBACKUP had the 
ability to manipulate MAPALGORITHM, which deter- 
mines how files are laid out on the disk efficiently to account 
'or rotational speed, seek time and transfer rates. When the 
system was ready to use again, 1 ran SDOSDISKINIT and 
'ound the best MAP parameter (the program can be told 
:o try all 30 possibilities and let you know the best one). 
I was then able to build a system disk that ran without read 
:rrors, and the system was noticeably faster. The drive 
motors still are a lot slower turning off after use than with 
Disk BASIC. 

If all of this sounds pretty technical, remember that this 
system is not for beginners. The manuals are well-written 
md you can learn from them, but they are not tutorials. 
'SDOS for the 6800/6809" is designed for use on several 
different computers, so the main manuals are written in 
jeneralized form. The CoCo SDOS manual was issued in 
1984 and contains just those elements of SDOS unique to 
:he CoCo; it refers you to other manuals for all other 
nformation. 

This type of organization has its pros and cons. The 
system developer can afford to invest more time and money 
n a system with broader use, which means more quality and 
areadth of features. On the other hand, more compromises 
may be necessary to fit an operating system to several 
:omputers, plus the user is forced to juggle manual 
nformation that isn't always in ideal order for his computer 
and is also more likely to contain conflicting information. 
I ran into some conflicts of this type with SDOS, but the 
power of the system greatly outweighed these minor 
problems. 

The DISMOUNT command, which is required before 
removing a diskette, is somewhat of a nuisance, but it buys 
you some very nice features. First of all, you get I/O Error 
reports that indicate, before your disk drive and diskettes 
are in big trouble, that problems are building. Even Disk 
BASIC probably tries to reread a record up to 10 times before 
reporting an error (this is standard on bigger computers), 
but you never know how desperately your computer is 
struggling to get a record written or read. The SDOS record 
keeping of these so-called "soft read"errors leaves no doubt 
in your mind about the status of your drives and diskettes. 

SDOS keeps in memory the last "files" data so it can 
update directory and disk maps without disk accesses. For 
application programs, it dynamically buffers good size 
;hunks of files, so disk accesses are cut down. This is all 
very important to the speed of system operation. There is 
also a "Keyed File Package" for those wishing to do data 
management, and the system keeps track of all file space 
so records can overlap sector boundaries. This record 
management is completely transparent to the user at both 
design and operation time. 

There is a LOG feature that permits automatic capture 
of the keyboard dialog, which is beautiful for debugging and 
transaction recording. There is a built-in debugger that is 
activated at any time with control/ D. The SDOS system 



comes with an assembler, text editor and debugger, all at 
one low price. SDOS does not read Disk BASIC disks 
directly, but there is a utility program that can bring data 
from Disk BASIC disks to SDOS disks. SDOS can handle 
up to I28K, and Computer System Distributors promises 
a version able to handle hard disks soon. 

SEDIT and TYPE together make up the SDOS word 
processing package. They are issued as two programs 
because each can stand alone, the TYPE being able to 
message and print data from many sources other than 
SEDIT, and SEDIT being able to do more than just word 
processing. They also require the SDOS operating system. 
I have used three major word processing systems written 
for the CoCo and the SDOS very much resembles one of 
these systems. I disagree with CSD that SEDIT is easier to 
use than most word processors: Margin handling is 
confusing. A short tutorial covering the most common tasks 
would greatly improve the documentation. The fact that 
you must use reverse video for lowercase letters and having 
only a 32-character screen mode are major drawbacks in 
my estimation.. Of course, you do get increased speed in 
many of the more complex operations this way. SDOS can 
handle modem cards and an external CRT, so you can get 
80-column operation this way. 

TYPE can print data in variable widths and do so with 
automatic justification. It uses embedded commands of a 
wide variety. I found these functions work well and, for the 
most part, are easy to invoke. TYPE also has merge 
capability. The TYPE manual has over 50 pages, including 
the addendum, and there's no way can I do justice to this 
program with the little use I was able to give it. Suffice to 
say, TYPE is a very thorough piece of software. You can 
learn the basic steps quite quickly and easily, and when you 
need to do something sophisticated, chances are good that 
TTPfcandothejob. 

To sum up, I think the SDOS system and its family of 
programs are generally well-documented, well worth the 
money, well-designed and as stable a group of programs as 
you are likely to find. In spite of this, I think there are many 
people who will not find SDOS their cup of tea, but for 
the CoCo computer hacker, SDOS is a powerful and cheap 
paradise. 

(Software Dynamics, distributed by Computer Systems 
Distributors, P.O. Box 9769, Anaheim, CA 92802, SDOS, 
editor, debugger and assembler S49.95, SEDIT and TYPE 

$49.95) 
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House Doc — an Electronic 
Doctor Who's Always on Call 

"Take Iwo aspirin and call me in the morning" is the 
typical response when asking an off-duty physician about 
a medically related problem. To alleviate this dilemma, we 
now have House Doc, an electronic doctor who is always 
on call. 

House Doc owes its creation to Darrell Wells, M.D., 
Ph.D. Hardware requirements are a CoCo 2 with Extended 
BASIC and a disk drive. The copy-protected program is very 
easy to understand and operates extremely well. The 
attractive 16-page manual contains a medical glossary, 
descriptions of tests and procedures, and prescription 
information. The manual also states a precaution that 
"House Doc is designed to help you with your medical 
conditions" and is not meant to replace your family 
physician. 

Upon executing House Doc, several introductory screens 
are displayed. Two of them ask the patient's name and sex. 
The former aids the doctor's bedside manner whereas the 
latter assists in narrowing the symptoms/diseases applica- 
ble to that gender. From here the patient chooses from a 
list of 18 symptoms for further analysis, or to a specific 
disease, of which 35 are listed. 

If the symptom option is chosen, the doctor queries the 
patient on various aspects of the problem. After the 
questioning is completed, Dr. CoCo consults his "in-house 



%CoCo GARDNER 



Order soon for your spring gardenl Superlative garden planning aid. A 
wealth of background information (which is provided) is used to decide 
what will fit into your garden and how much to plant in each row. A chart 
is developed to show a reasonable sequence in which to plant your 
garden. Print out vegetable data sheets and shopping list to supply your 
qarden with necessary plants and seeds. 
-, SI 9.95 



IHyTl^GUIDE 



Analyze your eating habits in terms of thirteen nutrients. Keep regular 
weight charts. Recommends calorie intake, compares eating style with 
recommended calorie, protein, fat and carbohydrate intake. Over 650 
foods on file. Make your recipes from combinations of foods on filel 64K 
DISK REQUIRED. 

$25.00 



tmitm) 



w 

Medical advisor offering suggestion for medical problem areas. Select 
the area to study, then look at details for that area. You are asked 
questions about possible medical symptoms. Using this information 
MEDIC provides guidance for home treatment products to use. 
background information or varying levels of urgency to see a doctor. 
Other programs cost 3 TIMES as much, but do not do three times as much. 

$20.00 



mECHAmc 



Be sure you are not caught with a flat spare tire or a dry battery againl Use 
this program once a month. Input date and odometer reading, get a 
maintenance due list based on time since last maintenance and miles 
driven. These records will help your car maintain its valuel 

$15.00 



9j DISKS 97<P 



SS/DD for your CoCo. Fully warranted. Minimum order 10. While supply 



VISA 
MASTERCARD 



Homesoft Company 

P.O. Box 8 
Supply. N C 28462 



(919) 842-4436 (7 days. 24 



"I 



ea.97C 



Add S2 00 ship- 
ping and handling 
NC residents add 
A% sales tax 



library" (66 granules are used on the disk) and relies on hi: 
extensive experience to list, in order of probability, tht 
diseases that may be causing the symptoms. Once th< 
patient agrees to one of the diagnoses, the doctor gives hi; 
prescription for healing. These range from taking vitamin; 
to changing eating habits, among others. If the medica 
problem appears to be serious, House Doc issues a louc 
warning notifying the patient to consult a physiciar 
immediately. If the disease option is chosen, the patient car 
learn about the disease, its causes, consequences and cure. 

In testing the diagnosis function, my wife and I entered 
the symptoms from medical problems we had experienced 
in prior years. House Doc accurately diagnosed each 
ailment we had experienced! We both found House Doc 
interesting, informative and fun to use. With the high cost 
of medical care, the program can save trips to the local 
doctor by successfully diagnosing medical problems thai 
can be remedied at home. Furthermore, when a medical visii 
is required, one can talk more intelligently about the 
problem to the doctor by first consulting House Doc. 

My only reservation with the program is the disk 
protection routine. The manual states that if a disk crashes, 
the user must resort to a disk repair utility. I would prefer 
a protection method similar to the one used by DynaCalc, 
where the master disk makes runnable programs that 
cannot be copied. At the very least, the author could have 
provided two disks. 

Regardless of this. House Doc is an excellent program 
and would be welcomed in any household; just think, when 
someone asks if there is a doctor in the house, you can pull 
out your floppy disk and say, "Yes!" 

(For Your Health Software, 58-A Star Rt., Coalmont, TN 
37313, disk $59.95) 

— Dan Smith 



Hint . . . 



Get the Sound Out 



You can send sound from your 80C to any amplifier 
simply by soldering a couple of connections from the 
RF modulator. 

Pin 3 from the RF modulator and any PC Board 
ground will give you audio output that you can send 
to any outside amplifier. 

Incidentally, Pin 3 is the third pin back from the 
rear of the 80C on the RF modulator. 

You should remember that opening the computer 
case will void your warranty. 
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Create Dazzling Graphics 
with Micro Illustrator 

Micro Illustrator is a graphics creation program that is 
an adaptation of the MS-DOS program by the same name. 
It requires a64K CoCo with a disk drive. The program also 
runs under OS-9, however, OS-9 is not needed to run Micro 
Illustrator. If you have a CoCo with BASIC Version 1.1 or 
later, all you need do is enter the DOS command to boot 
the program. If not, there is a BASIC routine provided in 
the manual that boots OS-9 from the Micro Illustrator disk. 

Micro Illustrator uses both the keyboard and a joystick 
(or mouse) for command and control of operations. While 
most commands are presented on the screen in the form of 
icons, they can also be executed from the keyboard by single 
keystrokes. This can be very useful since the icons are 
displayed on a separate screen. In fact, there are two screens 
of icons. The first screen lets you select drawing mode, brush 
shape and color. The second screen contains a selection of 
patterns and colors. 

Let's take a look at the drawing functions of Micro 
Illustrator. The first function you see on the menu is DRAW. 
DRAW provides the capability to do freehand drawings. 
While holding down the joystick button, the cursor 
produces a trail in the selected color. You are given two line 
functions for drawing straight lines, LINES and LINE. 
Both functions operate in similar fashion. The difference is 
that LINES produces a series of connected lines, while 
LINE is used to produce unconnected lines. These functions 
use the rubber band method of drawing. The start of the 
line is fixed when you press the joystick button the first time. 
You are then free to move the end point of the line to the 
desired position. The second press of the joystick button 
actually draws the line. 

Micro Illustrator provides a FRAME function that can 
be used to draw a rectangular outline. One press of the 
joystick button defines one corner of the frame. By moving 
the cursor, you define the size and proportions of the frame. 
The second press of the button makes the frame permanent. 
The CIRCLE function operates similar to FRAME. Two 
other functions similar to FRAME and CIRCLE are BOX 
and DISK. BOX is used to draw a solid rectangle with the 
selected color or pattern. DISK produces a solid circle. 
There is also a FILL function, which allows you to fill in 
any enclosed area with a selected color or pattern. Another 
"painting" type function is SPRAY. This produces a spray 
paint effect. 

If you need to reproduce objects or areas of the screen. 



OS-9 BULLETIN BOARD 

PBBS 4.0 Features: 300/1200 Baud - A levels 

Definable drive names - Multiple sub-boards - Chat 

Operation visible on screen - EXPANDABLE!!! 

Requires: OS-9 - Basic09 - TRS-BO RS-232 pak 
Multipak or Y-cable - 3 floppy drives or Hard drive 
Hayes-compatible modem. 
Send check or MO S. D. Roberson 
for $50.00 to: 1702 W. Mt. Veiw 

(AZ res. add 6.5%) Mesa, AZ 85201 
See PBBS in operation 24 hours a day: 602-699-1350 



Micro Illustrator makes it easy. It gives you a COPY 
function. Just outline the object, press the joystick button 
and you can move the object anywhere on the screen and 
make replicas of it. There is also a ZOOM function that 
magnifies any portion of the screen and lets you use any 
of the drawing functions to produce better details. 

Micro Illustrator has two more functions that really make 
it fun to use, MIRROR and RAYS. The mirror function 
is the most complete of its kind. You not only get horizontal 
and vertical mirrors, diagonal and radial mirrors can also 
be selected; you can even select any combination or all 
mirrors! Some very exotic designs can be produced with the 
different combinations of mirrors. 

The most unusual function is RAYS. You move the cursor 
to a starting point on the screen and press the joystick 
button to fix the center point. Next, move the cursor to 
define the length and start of the rays. The final step is to 
move the cursor while holding down the joystick button. 
This produces a series of lines radiating from the center 
point. The spacing of the lines depends on the speed at which 
you move the joystick. Some extraordinary effects can be 
produced with RAYS. Combining RAYS with MIRROR 
creates dazzling artistic effects. 

Micro Illustrator is not only easy to use, it is fun to use. 
In fact, I should warn you that when you are using it, you 
may forget about time and all the other things that need 
to be done around the house! 

(Tandy Corp., available in Radio Shack stores nationwide, 
requires 64K, disk S29.95) 

— Mike Piotrowski 



COLOR BANKBOOK $19.95 

• BUSINESS BANKBOOK 

SVSTEM ONE 

FOR ONE DISK DRIL'E 

$49.95 
SVSTEM TWO 
FOR TWO DISK DRIUES 



$49.95 



SUPERDISK UTILITY 



# RAOIOLOG 



$ 9.95 
* 9.95 



WRITE FOR MORE 

INFORMATION. 



ALL PROGRAMS INCLUDE MANUALS , 
REQUIRE 3£K AND 1 DISK DRIVE. 
ADD J2.00 SHIPPING i HANDLING 
FLORIDA RES. ADD 5K SALES TAX 






RAINBOW 
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PreReader 

32K ECB; 

Joystick 
Required 

Tape -$19.95 
Disk - $24.95 



Level I - your child will work with col- 
ors, shapes, numbers, capital letters 
and small letters 

Level II - your child will learn to asso- 
ciate individual letters and consonant 
blends with the sounds they make 




Songs and happy faces for each correct answer! 




5t«dto 
Stasia 



Helps design or evaluate: 

• Land mobile radio systems 

• Satellite TV 

• Satellite data acquisition systems 

• Aircraft radio systems 

• Microwave systems 

• Microvolt DBM conversions 
Frequency/Wave length conversions o««x ppo 

$29.95 - Tape 



System received signal levels 
Gain of parabolic antenna 



Propogation Calculations 



$32.95 - Disk 



Cental Property 

lnt« me and I xnense 
Mciiicifiomont 
Packaae 
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Disk - $34.95 
32K Required 

• Keeps track of all your rental properties 

• Provides instant screen or printer summary of all 
your properties 

• Maintains and prints a detailed, itemized listing of 
each of 28 expense categories 

• Gives you a schedule of the Accelerated Cost 
Recovery System depreciation allowed for each tax 
year for 3, 5, 10 and 15 year property 



^;a\h,I!i\i 

«;■ ;iplii< \ Editor 

• Graphics editor to create and modify your 
own pictures 

• Pictures can be usd as a title screen for 
a program 

• Create a series of pictures to make a 
slide show 

• Both Extended and non-Extended Basic 
versions on the same tape 

• High Resolution 

• Semigraphic modes 
8, 12, and 24 
(64 x 64, 64 x 96 
and 64 x 1 28) 

• 8 colors 

• Combine text 
with graphics 

• Auto-repeat and 
"magic" delete 

• Requires 16K 




. . . for the Programmer in the Family 



Tape - $19.95 
Disk - $24.95 



AUTO DUN 



AUTO RUN 64 - $24.95 
AUTO RUN -$19.95 

°o o O Ta P e 



Creates a ML loader which automatically starts up 

your Basic or ML program 

Title screen utility 

Provide an audio introduction 

Locates your program at the desired address 




32K Disk 
$99.95 



PIRATECTOR!® 

You write the Basic or ML program. 
Piratector®': 

• Supplies protection scheme 

• Includes Semigraf graphics 
editor 

• Incrementing serial numbers 

• Many user subroutines included 

• Effective against popular piracy/ 
protection cracking programs 






Dealer and author inquiries arc al- 
ways welcome. Canadian dealers 
should contact Kelly Software Dis- 
tributors, Ltd., P.O. Box 11932, 
Edmonton, Alberta T5J-3L1, (403) 

421-8003. 

Disk software compatible with Radio 

Shack DOS onlv. 



SUGAR SOFTWARE 

1710 N. 50th Ave. 

Hollywood, Florida 33021 

(305) 981-1241 

A complete catalog of oilier sweet 
Sugar Software products is available. 



Add $1.50 per program for postage and 
handling. Florida residents add 5% sales tax. 
COD orders are welcome. CIS orders EMAIL 
to 70405, 1374. No refunds or exchanges. 
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See You at 
Chicago RAINBOWfest 



Use your CoCo, your 8-bit dot addressable graphics 
printer and the CoCo Calligrapher to create beautiful 
signs, invitations, flyers, greeting cards, diplomas, cer- 
tificates, awards and love letters. 

The original Calligrapher letters are 36 points (1 12 inch) 
high and variably spaced. It includes an easy-to-use , 
menu-oriented program and these three typestyles: 



Cartoon 



Old English 

(DM ^Jifllt^h Gurtoeo 



Gay Nineties 



Gey Nineties 

The CoCo Calligrapher requires 32K ECB. 
Tape $24.95 Disk $29.95 



ADDITIONAL TYPESTYLES 

These tapes of additional typestyles are available for 
$19.95 each. They can be easily moved to disk. The 
original Calligrapher program is required. 

Tape 1 - Reduced, Reversed, and Reduced-Reversed 
versions 



Old English 



Gay Nineties 



Cartoon 



utut<<actmclcislial»cde 



All typestyles on Tapes 2, 3, 4, 5, and 6 include Stan- 
dard (1/2 inch), Reversed, Reduced, and Reduced- 
Reversed unless otherwise noted. 

Tape 2: Broadway/Old Style 

IBroaduay tJ|lj$fulc 

Tape 3: Business/Antique 



These disks of additional typestyles are 
available for $49.95 each. 

Disk 1 - all type styles on Tapes 1 , 2 and 3. 
Disk 2 - all type styles on Tapes 4, 5 and 6. 

Tape 4: Wild West/Checkers 



Wild West Checl 



ers 



Tape 5: Star 



<r* 



Hebrew 



-fairs □1 6 7X2 ? 



Victorian (Standard and Reverse only) 
Tape 6: Block7Computer 

Block 

CompuTEPi 



mj|£ (B^-9 fflalltgraplter. 



$39.95 

Requires OS-9 Version 01.01.00 and a dot matrix print- 
er. The OS-9 Calligrapher reads a standard input text 
file which contains text and formatting directives to pro- 
duce standard utput for printer or disk. You can specify 
which font to use; centering; left, right or full justification; 
line fill; narrow mode; margin; line width; page size; 
page break and indentation. 



These disks of additional typestyles are available for 
$49.95 each. They are not compatible with the CoCo 
Calligrapher typestyles or program. OS-9 typestyle 
disk must be used with the OS-9 Calligrapher. 

Disk 1 - OS-9 version of all type styles on Tapes 1 , 2 and 

3. 

Disk 2 - OS-9 version of all type styles on Tapes 4, 5 and 

6. 



Dealer and author inquiries are al- 
ways welcome. Canadian dealers 
should contact Kcllv Software Dis- 
tributors. Ltd., P.O. Box 11932, 
Edmonton, Alberta T5.J-3L1, (403) 
421-8003. 

Disk software compatible with Radio 
Shack DOS onlv. 



SUGAR SOFTWARE 

1710 N. 50th Ave. 

Hollywood, Florida 33021 

(305) 981-1241 

A complete catalog of other sweet 
Sugar Software products Is available. 



Add $1.50 per program for postage and 
handling. Florida residents add 5% sales lax. 
COD orders are welcome. CIS orders EMAIL 
to 70405, 1374. No refunds or exchanges. 
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Geography USA is an 
Excellent Learning Tool 

Did you know that Concord is the capital of New 
Hampshire or that Pierre is the capital of South Dakota? 
How about this: Did you know the capital of New York is 
not New York City but Albany? I'm sure you know the 
answers to these pieces of trivia if you live in those states, 
but in Utah, where I live, if it is east of the Rocky Mountains 
I could not be sure if it is in the United States. If you want 
to learn the states and capitals but are a little afraid because 
your spelling is the pits or you can never remember what 
state is next to what, this could be the program for you. 

Geography USA is written for the I6K standard CoCo. 
The program is in five short segments so each part can fit 
into the memory of a I6K machine. You can also get the 
program on disk and use it on an Extended I6K, 32K or 
64K machine. The program is started by loading and 
running "USA". You have a choice of nine sections of the 
United States with which you would like to work. If you 
have a disk drive they may be done in any order, but with 
cassette, you must do them in order or wait for the recorder 
to find the next section, which can take a minute or two. 

When you get to the chosen section of the country, you 
can then choose if you would like to answer just the state 
names, the capitals, or both, the major cities or the major 
products. No matter what is chosen, you first see the states 
and then the answers. When you have studied enough, press 



The Coco Greeting Card Designer 

The Coco Greeting Card Designer is the perfect program 
for the Holiday Season! You can Create and Print custom 
Greeting Cards to send to Friends and Relatives. 
The Coco Greeting Card Designer can be used to design 
and print custom Greeting Cards for all occasions 
including: Thanksgiving, Christmas, New Years, Birth- 
days, Valentine's Day, Mother's Day and others. It can 
also be used to make custom Invitations, Thank-You 
Cards, Get-Well Cards and Announcements. 
The Coco Greeting Card Designer is easy to use and 
includes a library of predrawn Hi-Res Graphic Pictures! 
You can write custom messages on the cover and inside 
your cards in a selection of character fonts and sizes. An 
easy to use screen editor allows you to pick your type 
style, font size and more. Two fonts are included, and the 
easy to use editors allow you to create many more! Also 
included is a selection of border patterns. 
The Coco Greeting Card Designer requires a Coco or 
Coco II with a minimum of 32K, One Disk Drive (Com- 
patible with: Disk BASIC 1.0 & 1.1 and JDOS.), and one 
of the following printers: EPSON RX/FX, GEMINI 10X or 
SG-10, C-ITOH 8510, RS DMP Series, GP-250 and 
GORILLA BANANA. 

Only: $24.95 

plus S3 00 Shipping & Handling 

NY Residents add sales lax 

UPS. COO ADD $3.00 

VIS^/MC Accepted 

ZEBRA SYSTEMS, 
INC. 

78-06 Jamaica Avenue 

Woodhaven. New York 11421 

(718) 296-2385 

Dealer Inquiries Invited 







any key and the computer tests your memory. If something 
is spelled wrong you still get credit for it, but it is noted 
that it was spelled wrong. 

Considering the limitations of a standard BASIC computer 
versus the Extended BASIC computer, the program is pretty 
good. The scope and sequence of the material covered is 
done in small enough steps that concepts can be easily 
learned. It is also forgiving to the person who can remember 
the states but doesn't know how to spell them. It gives credit 
for knowing a state, but gives more credit if you spell it 
correctly. I think that is a strong point for this program. 
You can learn the states without being frustrated because 
of spelling. 

I think this program would be better if there were a 
version made for the 32K. or 64K machine and put on disk 
or tape as one progam. not five. Having the program written 
in standard BASIC is not a major detraction from its 
appearance or usefulness; as a matter of fact, having eight 
colors to work with is nice when working with maps, but 
it is somewhat of an inconvenience to own a disk drive and 
64K machine and have a program that does not utilize all 
of the machine or is always going to the disk and repeating 
some of the steps in each section of the program. 

Now, would I buy the program myself? If all I had was 
a 16K standard BASIC CoCo, I think it is a good program 
to have. It is written in a professional manner and has a 
sound sequence in its curriculum for teaching and testing 
the states. I don't think that using just standard BASIC is 
a major hinderance, but it would be nice if there was a 
version for owners of larger CoCos. 

(Viking Inc., 910 Soo Blvd., Rice Lake, WI 54868, cassette 
or disk $19.95) 

— Thomas E. Nedreberg 



Hint . . . 



Saving in ASCII 



When you save programs. CoCo can perform this 
function in two ways: by using binary codes or actual 
letters and numbers (called ASCII and pronounced 
"as-key"). 

Although it takes longer, ASCII is sometimes a 
more accurate way to save a program, especially when 
you may be transferring programs between systems — 
say from a disk-based to a cassette-based system. 

To save in ASCII, simply add a comma and an 'A' 
to the end of your SAVE instruction, like this: 
CSflVE "PROGRAM", fl and the ASCII save is done by 
CoCo, 
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The BMC Monitor Stand Makes 
CoCoing More Comfortable 



Are you leaning left and right in your chair to see what 
your monitor is saying? Have you tried your hand at 
inventing devices to block the glare that plagues every 
computer user? 

If you answered yes to either of these questions, the BMC 
Pan-tilt Model PA-900 monitor stand from Spectrum 
Projects can help you make your time at the computer more 
comfortable. 

This stand, designed for 12-inch monitors, not only 
revolves a full 360 degrees, it also tilts up or down 12.5 
degrees. To give you some idea of what a 12.5 degree tilt 
means, let it suffice to say it can accommodate anyone from 
a 3 foot tall child to a 7 foot tall giant. 

Viewing is easier and computing more comfortable with 
an accessory such as this. Glare is no longer a problem 
because the monitor stand lets you rotate your monitor to 
avoid eye-level light sources, as well as tilt it to avoid the 
glare of ceiling lights. At the center of the stand platform 
is a butterfly nut which can be tightened to avoid accidental 
tilting. It is necessary, however, to remove your TV or 
monitor from the stand to adjust the nut. 

Surely, you've experienced the need for more than one 
person to see the monitor at the same time. I've welcomed 
friends to my home to play with my computer and have 
noticed that they end up with either a crick in their neck 
or sore feet from standing behind me. With the BMC 
monitor stand all I did was push in the right direction and 
the monitor was swiveled to a position which was comfor- 
table for my friends, and they left me and my CoCo in the 
same state of health they were in when they came over. 

The BMC Pan-tilt instructions come on a single sheet 
which describes the angles of revolution and tilt, as well as 
how to adjust the stand and how to place the monitor for 
best results. The instructions are written in both Japanese 
and an amusingly stilted English. Example: "When putting 
CRT monitor on pan-tilt, put CRT monitor so as not to 
give shock to pan-tilt." In other words, don't set your 
monitor down so hard you break the plastic stand. Actually, 
the stand appears quite sturdy and well-made. The last of 
the five easy instructions, each illustrated, tells you not to 
place the monitor so far forward on the stand that it tips 
over into the floor; that's good advice, too. 

The stand comes assembled and ready to go right out of 
the box, complete with non-skid padding to keep your 
monitor safe. It is cream colored, which blends well with 
most any equipment or furniture you may have. 

I think the BMC monitor stand is a good addition to 
anyone's computer equipment collection. The easy adjust- 
ment, safe placement of your monitor and comfort afforded 
are worth the cost of the stand. 

(Spectrum Projects, Inc., P.O. Box 21272, 93-15 86th Drive, 
Woodhaven, NY 11421, S24.95 plus S3 S/H) 

— Jim Sewell 
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Back copies of many issues of the 
rainbow are still available. 

All back issues sell for the single issue 
cover price. In addition, there is a $3.50 
charge for the first issue, plus 50 cents 
for each additional issue for postage and 
handling if sent by United Parcel Service. 
There is a $5 charge for the first issue, 
plus a $1 charge for each additional issue 
on orders sent by U.S. Mail. UPS will not 
deliver to a post office box or to another 
country. 

Issues July 1981 through June 1982 
are available on white paper in a reprint 
form. All others are in regular magazine 
form. VISA, MasterCard and American 
Express accepted. Kentucky residents 
please add 5 percent state sales tax. In 
order to hold down costs, we do not bill 
and no C.O.D. orders are accepted. 

Due to heavy demand, we suggest you 
ordertheback issues you want now while 
supplies last. 

To order, just fill out the form on the 
next page and mail it with your payment 
to: 



THE RAINBOW 

The Falsoft Building 
P.O. Box 385 
Prospect, KY 40059 
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BACK ISSUE ORDER FORM 






(See overleaf for instructions.) 




; (Payment must accompany back issue orders. 


We do not j 


J bill.) 








; D Please send me (r 


e following back issues: 








VOLUME 1 






MONTH 






• NO. 


YEAR 




PRICE 


1 


JULY '81 


PREMIER ISSUE 


S2.00 D ; 


: 2 


AUG. '81 




$2.00 D 


: 3 


SEPT. '81 


EDUCATION 


$2.00 d : 


4 


OCT. '81 


PRINTER 


$2.00 d : 


5 


NOV. '81 




$2.00 □ 


: 6 


DEC. '81 


HOLIDAY 


$2.00 D 


: 7 


JAN. '82 




$2.00 □ : 


: 8 


FEB. '82 




$2.00 a : 


9 


MAR. '82 




$2.50 D • 


: 10 


APR. '82 




$2.50 D 


: 12 


JUNE '82 


VOLUME 2 


$2.50 a : 


10 


APR. '83 


SIMULATIONS 


$2.95 □ 


'. 11 


JUNE '83 


PRINTERS 


$2.95 □ 


12 


JULY '83 


ANNIVERSARY 
VOLUME 3 


$2.95 □ : 


: 1 


AUG. '83 


GAMES 


$2.95 D • 


'. 2 


SEPT. 83 


EDUCATION 


$2.95 □ 


: 3 


OCT. '83 


GRAPHICS 


$3.95 □ : 


: < 


NOV. '83 


DATA COMM. 


$3.95 □ : 


5 


DEC. '83 


HOLIDAY 


$3.95 □ 


: b 


MAR. '84 


BUSINESS 


$3.95 D 


: 9 


APR. '84 


GAMING 


$3.95 D : 


: 10 


MAY. '84 


PRINTER 


$3.95 □ 


11 


JUNE '84 


MUSIC 


$3.95 □ 


: 12 


JULY '84 


ANNIVERSARY 
VOLUME 4 


$3.95 D I 


• 1 


AUG. '84 


GAMES 


$3.95 D ■ 


2 


SEPT. '84 


EDUCATION 


$3.95 D ■ 


: 3 


OCT. '84 


GRAPHICS 


$3.95 D 


: 4 


NOV. '84 


DATA COMM. 


$3.95 D : 


• 5 


DEC. '84 


HOLIDAY 


$3.95 D ; 


: 6 


JAN. '85 


BEGINNERS 


$3.95 D 


l 7 


FEB. '85 


UTILITIES 


$3.95 a 


: a 


MAR. '85 


BUSINESS 


$3.95 D I 


• 9 


APR. '85 


SIMULATIONS 


$3.95 d : 


10 


MAY '85 


PRINTER 


$3.95 □ 


: n 


JUNE '85 


MUSIC 


$3.95 □ 


: 12 


JULY '85 


ANNIVERSARY 
VOLUME 5 


$3.95 n : 


• 1 


AUG. '85 


GAMES 


$3.95 □ : 


: 2 


SEPT. '85 


EDUCATION 


$3.95 D '• 


: 3 


OCT. '85 


GRAPHICS 


$3.95 □ : 


• 4 


NOV. '85 


DATA COMM 


$3.95 D : 


5 


DEC. '85 


HOLIDAY 


$3.95 D 


: 6 


JAN. '86 


BEGINNERS 


$3.95 D 


: 7 


FEB. '86 


UTILITIES 


$3.95 D I 


: 8 


MAR. '86 


BUSINESS 


$3.95 D ; 


: RAINBOW INDEX A com 


plete index to our first three yea 


rs. July 1981 ■ 


' Ihroug 


h June 1984. is primed in its entirely in our Juls 


1984 issue. ". 


; Separately bound copies 


are also available. 


$2.50 D : 


I Note: 


Our Fourth Year 


ndex. including an index to a 


I editions ol ". 


; RAINBOW ON TAPE, is included in the July 1985 issue. 
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Book Reviewi 



CoCo Incognito is Packed 
with Useful Information 



7fc> 



If you are a loyal subscriber to RAINBOW, you have 
probably seen many POKEs and PEEKS that allow you and 
your CoCo to do some amazing things. However, how many 
times have you wanted a particular PEEK or POKE, but could 
not remember where you had seen it? Unless you keep a 
very good record of all those hints that RAINBOW and its 
subscribers have given throughout the years, you will not 
know where to look for all these little goodies. Besides the 
hints, there are other schemes that allow the CoCo to do 
all kinds of things. 

You are probably saying at this point, "Where can I get 
all this wonderful information?" Enter RC Creations. RC 
Creations has released CoCo Incognito. This booklet 
contains 25 pages of information with approximately 10 
PEEKs, 60 POKEs, 20 EXECs, 25 BASIC subroutines, 10 
machine language subroutines and 45 game hints and tips. 
This is RC Creations' second booklet of hints and tips; their 
first was System Secrets, reviewed in the September 1 984 
RAINBOW. 

As with their previous booklet, the information contained 
in CoCo Incognito has probably been listed somewhere 
before. While I had seen some of the information before, 
many items were new to me, and even the items I had seen 
before, 1 would not have known where to look for them 
when I needed them. It is really nice to have all this 
information at your fingertips, all in one place. 

CoCo Incognito could possibly have come up with a 
product that has something for everyone. If you play games, 
you will be interested in the schemes to increase the number 
of tokens or the speed of certain games. Other game options 
are also included. On a more serious note, there are 
modifications to BASIC and Extended BASIC commands and 
key words. Also included are tips to work with text and 
graphics for the text screen and for using Hi-Res graphics. 
You must realize that some of this information is for 
advanced programmers, i.e., you have to know how to use 
the information. However, you do not have to be an expert 
to find this booklet useful. Novice programmers will find 
much of it helpful, and as the information is used, it should 
even improve their knowledge of the CoCo. 

If you are either a serious programmer or someone who 
just likes to play with the CoCo, there is plenty of 
information packed in these 25 pages. At $7.95, it makes 
an excellent reference source for vour CoCo bookshelf. 



(RC Creations, 17251 Palatine N., Seattle, WA 98133, S7.95 
plus $1.50 S/H) 



— Dale Shell 
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CoCo Calendar Can Help You 
Get Organized 



The CoCo Calendar from Spectrum Projects is what 
those who want daily reminders need. The CoCo Calendar 
can't make dates for you, but it certainly will help you keep 
them. When the program is run, the user is asked for the 
current date. After that, any memos for that day are 
displayed. After reading the memos the user hits the space 
bar and a Hi-Res calendar is displayed. 

The calendar is well designed and attractively displayed. 
If there is a memo for a particular day in the month 
displayed, the user sees a small black box underneath that 
day. At the bottom of the calendar is a help section which 
reminds the user of the available options. These options 
consist of changing the target date, entering the memos 
necessary to keep track of appointments, schedules, 
birthdays, etc., deleting a memo, reading a memo, returning 
to basic, or using a screen dump the user provides to dump 
the Hi-Res calendar. 

The change target date is provided to allow access to 
information at a date different than that entered at the 
beginning of the program. The enter, delete, read and return 
to BASIC are all self-explanatory and need no further 
elaboration. 

The print option is provided so one can use any of many 
screen dump programs to print the Hi- Res calendar. Notice, 
the CoCo Calendar has no dump program incorporated 
into itself. 

There is another print feature available while reading a 
memo. After the memo for the chosen day is read, the 
program asks if it is to be printed. Answering yes will give 
a text printout of the memo date, followed by the memo 
itself. 

The instructions that come with the CoCo Calendar are 
sufficient and inlcude explanations of each feature, as well 
as ways to save the Hi-Res screen to disk and to keep more 
than one memo per day. This documentation is thorough, 
but concise, which is welcome in any utility. 

Memos entered are stored into a data file on the working 
disk and are separated by year. That is to say, all memos 
for 1985 will be stored into a file called "1985/ DAT." This 
allows hundreds of memos to be entered for each year and 
easy manipulation of entire years. By this means one can 
store each year in an archive or delete it entirely when 
finished with it. 

Overall, I think the CoCo Calendar is a useful program 
for those of us who either need daily reminders or wish to 
be more organized without spending countless hours getting 
that way. 



(Spectrum Projects, Inc., P.O. Box 21272, 93-15 86th Drive, 
Woodhaven, NY 11421, 32K/64K disk $24.95 plus $3 S/H) 

— Jim Sewell 



TX is a Modest Word Processor 
Written in BASIC 

TX is a modest word processing program written in 
BASIC. It supports a maximum buffer capacity of one page: 
66 lines of 80 characters. The default is all uppercase. It is 
possible to get upper- and lowercase by SHIFT locking. 
SHIFT 0. The default then becomes lowercase, with the 
characters appearing on the screen in reverse color. 
Uppercase may be had by the use of the SHIFT key, as usual. 

The screen display is Lo-Res CoCo standard, 32 by 15. 
TX treats this as a window over the page/ buffer, so as one 
begins text entry the cursor moves in the normal manner, 
left to right. Once the point is reached where the windowed 
area corresponds to the right segment of the page, the cursor 
appears to stand still and the text moves leftward as entered 
— in other words, the "page" moves under the "window." 

TX loads (and by the way, because there is a PCLEftR 1, 
you may have to enter RUN twice) to a main menu, offering 
disk I/O, print (buffer or marked block therefrom), buffer 
clear ("cancel"), disk directory and text entry (a screen 
editor with word wrap) as options. CLEAR acts as a "control" 
key, bringing up the main menu; or with SHIFT, a means 
of moving to the alternate mode from which insertions may 
be made; a block, line or column of characters may be 
marked off and manipulated (including calculation of such 
numerical values as are in the marked-off block); and single 
characters may be repeated: across a line, down a column 
or (for whatever reason one might want to do so) along a 
diagonal. The documentation, while by no means elegant 
or ample, is sufficient to get TX up and running. 

As mentioned, TX is written in BASIC. Therefore, even 
with the high-speed poke its function is very slow, even at 
a hunt-and-peck typing rate. Anything over about two 
characters a second results in lags and letters being left out; 
you are slowed up further by having to constantly backtrack 
and make corrections. The limitation in buffer capacity and 
print format need no further comment. 

Comparisons are awkward and inappropriate in a review. 
Nevertheless, it is only fair to ask the question: Is TX, for 
all its limitations, a good buy at its modest price, which is 
25 percent or less than that of the "heavies" among CoCo 
word processors? Candidly, I think not. There is at least one 
word processor in the approximate price range of TX 
offering the speed and accuracy of machine code, a buffer 
of disk size or, in the case of tape, over 50K, and a variety 
of print format options. Although I have have not had 
occasion to use that particular program in my own writing 
for some time now, I fired it up to draft this review, as a 
sort of"control"alongside TX. My advice? Even at its price, 
even for short items and even (or maybe especially) for a 
youngster or adult taking his or her first steps in using a 
word processor, TX is simply too limited and slow to be 
considered a serious option. 

(Kolesar B/S, 7 Ladd Rd., Westfield, PA 16950, disk $12.95 
plus $2 S/H) 

— John Ogasapian 
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DELPHI BUREAU 



Here by Popular Demand: 
New Delphi Enhancements 



By John R. Curl 
Rainbow's CoCo SIGop 



Happy Ides of March! I hope the 
command card printed in last 
month's issue has given you a 
better understanding of Delphi. We here 
at THE rainbow will continue to bring 
you the best information we can. I have 
several important items to pass along in 
this month's "Delphi Bureau." 

The substantial increase in DA- 
TAPAC rates have the most import, 
especially to our Canadian friends. 
Following is the official explanation 
given to THE rainbow of the reasons 
for the increase in rates. 

"DATAPAC is a packet-switched 
network, which has had somewhat of 
a monopoly in Canada for some 
time. Its rate schedule is complex in 
that it charges by kilocharacters of 
data transferred. There is apparently 
some sort of arrangement with 



RAINBOW technical assistant and Co Co 
SIGop John Curl is also a military 
policeman in the Army National Guard. 
He has had his Color Computer since 
1982. He and his wife, Becky, live in 
Louisville, Kentucky. 



Tymnet and Uninet, whereby the two 
U.S. carriers bill Delphi for the 
DATAPAC usage connected through 
their respective network. 

"Delphi's analysis of the situation 
in November revealed that when they 
computed the kilocharacter charges 
billed to them for access from Can- 
ada, the charges averaged around 
S12/hr. just for the Canadian por- 
tion. Delphi decided then to raise the 
surcharge (which is currently $3/hr.) 
to S12/hr. in order to more accu- 
rately reflect their cost of allowing 
access from DATAPAC through 
Tymnet and Uninet. The price list 
was updated in the "Using Delphi" 
section (available from the MAIN> 
menu prompt) at that time. Delphi 
apologizes for not posting a general 
announcement at the same time. 

"There are now. and will in the 
future, be other alternatives for 
accessing Delphi from Canada: 

"I) Tymnet has a node in Toronto 
and will be adding the other major 
cities early in the year. Uninet also 
plans to add Canadian nodes to its 
network. The rates will only be 
slightly higher than U.S. rates. 

"2) There is some sort of promo- 



tion going on by Bell Canada, called 
INET2000, whereby subscribers to 
INET can "gateway" into Delphi (via 
DATAPAC) for a flat rate — around 
the clock — of $16/hr. 

"3) Access through DATAPAC 
directly to Delphi will be $I8/hr. in 
the evenings and weekends, and $28/ 
hr. during the business day. Delphi 
says these rates are lower than Com- 
puServe's 1200 Baud rates for DA- 
TAPAC users as far as Delphi can 
determine from CompuServe's price 
sheet. 

"All of these rates are quoted in 
U.S. monetary funds." 

As you can imagine, this is also 
distressing news to us at RAINBOW. I'm 
afraid we will have to live with this 
arrangement for the time being. I will 
keep you posted as things develop. 

Now for some encouraging informa- 
tion. Here, by popular demand, are 
some recent Delphi enhancements. AH 
of the following list applies to the 
"CoCo SIG Forum" section. 

1 ) The READ command now accepts 
all of the same arguments as the DI- 
RECTORY command, including 
ranges, FROM x TO y, SUBJECT and 
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THREAD, and has been made gener- 
ally more consistent with the DIREC- 
TORY command. 

2) The READ and DIRECTORY 
commands now accept the argument 
NONSTOP (or NS) on any valid com- 
mand, e.g., READ NEW NONSTOP, 
READ FROM RAINBOWMAG NS, 
READ WAITING NS, READ 
THREAD 122 NONSTOP, etc. This 
feature allows messages to continuously 
scroll by without having to repeatedly 
press ENTER. 

3) At the end of a thread read by using 
the FOLLOW command and subse- 
quent carriage returns, pressing ENTER 
("READ NEW") takes you to the next 
message you would have read had you 
not typed FOLLOW. This means you 
may never have to see message number 
12 again. This should fill Marty Good- 
man with elation. 

4) The DELETE command now in- 
cludes the message number in the con- 
firmation. 

5) The (Forum contains messages x 
through y) message is now kept more 
accurate. 

6) A partial range entered (such as 
27:), e.g., DIR 27:, is now acceptable. 

7) The DIR command displays out- 
put more closely matching the current 
line length (/LENGTH command). 

8) ENTER pressed by itself generally 
means "NEXT" after an initial READ 
or DIRECTORY command until it can 
deliver no more matching messages. In 
this case, it is interpreted as READ 
NEW. Pressing ENTER also means 
READ NEW after an ADD command 
or after a DELETE, REPLY or EDIT 
command with a number as an argu- 
ment, since these commands implicitly 
destroy the context of what you were 
doing by going directly to a message. 

9) REPLY now takes an optional 
message number as an argument, so it 
is no longer necessary to re-read a 
message in order to post a reply. The 
message number must be the first argu- 
ment, if used, along with the MAIL 
option, e.g., REPLY 27 MAIL. 

10) READ <number> takes you to 
the next available message if the 
number selected has been deleted or is 
inaccessible. 

1 1) QUIT takes you out of the Forum 
section without updating your high 
message pointer. This is useful when 
you have followed a thread (thus updat- 
ing your temporary high message poin- 
ter), have not gone back to read the 



intervening message (or messages in 
other topics) and you want to come 
back to them at another time. 

12) You can now cancel (Control-C) 
a REPLY without damaging the con- 
text. A subsequent REPLY then works 
correctly. This eliminates empty mes- 
sages in the Forum section. 

13) ALL is a valid option on the 
READ NEW and DIR NEW com- 
mands, causing the Forum to ignore the 
"temporary map" of messages you have 
read during the current Forum session. 
DIR NEW ALL prints an asterisk 
beside any "unread" messages on the 
current listing. This listing is useful if 
you have been following threads around 
and want to find a particular message. 

14) The NEW option on the READ 
and DIRECTORY commands causes 
the Forum to select messages higher 
than your high message pointer that you 
have not read during the current Forum 
session (which meet your other options 
and topic criteria). The NEXT com- 
mand in any READ context also causes 
the Forum to skip any messages already 
read during the current session unless 
the ALL is specified as an option on the 
READ command. 

15) The HIGH command clears the 
"temporary map" of read/ unread mes- 
sages. This sets your permanent highest 
message read. 

The foregoing represents Delphi's 
response to a number of suggestions 
and complaints voiced here and in other 
SIGs. The features just mentioned have 
been heavily tested, but if any unusual 
responses occur when you use them, 
THE RAINBOW would appreciate a mes- 
sage from you, which we will forward 
to the good folks who made these 
needed changes for us. 

Sound Off! 

The CoCo SIG can only be made 
better if we know what you expect. As 
you can see, your hints and suggestions 
have not been made in vain. We encour- 
age you to continue to tell us of en- 
hancements and additions you would 
like to see made to Delphi. We have 
been assured that every serious sugges- 
tion will be considered. 

Public Domain Programs 

Now on to what has become a regular 
"Delphi Bureau" feature and a personal 
favorite of mine, the list of CoCo SIG 
members who have uploaded public 
domain programs into our databases. 



Devin Cook (ELECTROMAGIC)F;7e- 
diss: In the Assembly Language topic, 
this is a file disassembler for Radio 
Shack DOS. It allows you to build a file 
of table definitions and equates. Also 
included are Idem I has, which identifies 
the start, end and exec addresses of a 
binary file, and Compare/ bos, which is 
a byte-by-byte comparison of binarv 
files. 

William Borie (DISKBANK) COLO- 
RAMA /PIX: In the Graphics topic, 
this is a picture of the Colorama of 
Louisville BBS created by Tom Carmin 
using CoCo Max. This is an ASCII 
BASIC program. 

Bob Patten (N4BP) Musica File 
Squeeze: This is a collection of pro- 
grams that convert Musica 2 files from 
binary to ASCII format and back. Also 
included is Bob's arrangement of Chop- 
in's "Minute Waltz" in ASCII format. 
This group can be found in the Music 
topic. 

William Borie (DISKBANK) RE- 
DIAL/BAS: This ASCII BASIC pro- 
gram found in the Data Communica- 
tions topic continuously dials a BBS 
number until it detects a carrier. It will 
then LOfiDM and EXEC Mikeyterm. You 
can edit it and make it load your favor- 
ite terminal program. This program 
only supports the "bit-banger" serial 
port on the back of the Color Compu- 
ter. 

Stephen Macri (DRACMAN) KEL- 
LYII/BAS: Found in the Games topic, 
Kelly Checkers II is a checkers game 
with two players playing against each 
other or one player playing against the 
computer. This program uses a high 
resolution text and graphics screen. 

We invite you to upload any public 
domain programs that you feel the rest 
of our members would like. We want to 
see more member participation in the 
Database section so the SIG will have 
a better collection of programs to offer. 

Once again, I invite you to join us on 
Delphi's CoCo SIG. We like to hear 
first-hand from our readers (it gives us 
a feeling of accomplishment). We're 
always here ready to answer questions 
or help with a problem, so join us and 
become an active member in the realm 
of CoCo communications! 

t7\ 
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"The CBASIC Compiler" 

Now anyone can create fast efficient Machine Language Programs 
Easily and Quickly without having to use an Editor/ Assembler 



CBASIC Is a fully Integrated, easy lo use Basic program Edilof and Compiler package. CBASIC is 99% syntax compatible 
with Disk Extended Cobr Baste programs, so most Bat* programs can be loaded and compiled by CBASIC with little 
or no changes required The compilei is an optomizmg two-pass integer Basic compiler thai can convert programs wnlten 
in Disk Extended Color Basic Into 100% pure 6809 Machine Language programs which are written directly to disk In a 
LOADM compatible format 

The programs generated by the compiler can be run as complete stand alone programs A built-in linker/editor will 
automatically select one and only one copy of each subroutine that is required from the internal run-time library and insert 
them directly in the program This eliminates the need for cumbersome, often wastelul separate "run-time" packages 

CBASIC WAS DESIGNED FOR BOTH 
BEGINNING & ADVANCED USERS 

CBASIC is a Powerful tool for the Beginner oc Novice programmer as well as Ihe Advanced Basic or Machine Language 
programmer The Beginner or Novice programmer can write and compile programs without having to worry about SBack 
Pointers. DP registers, memory allocation, and so on. because CBASIC will handle it for you automatically All they have 
to do is write their programs using the standard Basic siatemenls and syntax For the advanced Basic and Machine 
Language programmers, CBASIC will let you take command and control every aspect of your program, even generating 
machine code directly in a program loc specialized routines or (unctions 

CBASIC adds many features not found in Color Basic, &ke Inienupl. Resel, and On Error handling It abo has advanced 
programming features that allow machine level control of the Stack and Direct Page registers, vanable allocation, automatic 
64K RAM control, program origin and even multiple origins It can even have machine language code generated within 
a program thai executes just Eke any other Basic program fine 

FULL COMMAND SUPPORT & SPEED 

CBASIC features well over 100 Basic Commands and Functions that fully support Disk. Tape. Printer and Screen 1/ 
O. It also supports ALL the High and Low Resolution Graphics. Sound, Play and String Operations available in Extended 
Color Basic, and all with 99 9% syntax compatibility 

CBASIC is FAST Not only will CBASIC compiled programs execute 10 to 1000 times faster than Basic, but the time 
it lakes lo develop a CBASIC program versus writing a machine language program is much, much shorter A machine 
language program that might take several months to wnie and debug could be created using CBASIC in a matter of days 
or hours, even for a well experienced machine language programmer We had a report from a CBASIC user that claimed 
"a Basic program that used to lake 3 hours to run. now runs in 7 lo 8 minutes" Another user reported a program I hat 
took I to Vfa houis to run In Basic, now runs in 5 lo 6 mtnules 1 " 

MORE THAN JUST A COMPILER 

CBASIC has Its own completely integrated Basic Program Editor The Editor contained in CBASIC is used to Create 
and/or Edit programs for the compiler It is a full featured editor wilh functions designed specially (or writing and editing 
Basic programs It has built-in block Move and Copy functions with automatic piogram renumbering. Complete, easy lo 
use Inserting, deleting, extending and overtyping of existing program lines It is also used for Loading. Saving. Appending 
(merging). Killing disk files and displaying a Disk Directory It also has automatic line number generation for use when 
creating programs or inserting sequencial lines between existing lines You can set the printer baud rate and direct normal 
or compiled listings to the printer for hard copy The built-in editor makes piogram conecbons and changes as easy as 
"falling off a log' If CBASIC finds an error when compiling, it points lo the place in ihe program line where the error 
occurred All you have to do is teU the editor what line you want lo start editing and wher it is displayed, move Ihe 
cursor wilh the anow keys lo the place where the error is and coned it. Just like that. It's simple. 

HI-RES & 80 COLUMN DISPLAYS 

CBASIC is ihe only Color Basic Compiler thai includes its own Hi-Resolubon 51. 64 or 85 by 24 line display It is also 
the only compiler that supports both the PBJ "Word-Pak" and the Double Density 80 column cards All of these display 
formats are part of the standard CBASIC compiler package. Not only can these display formats be used for normal 
program editing and compiling, but CBASIC will also include them in your compiled programs! II you want CBASIC to 
include ihe display dnver in your program, all you have to do is use a single CBASIC command "HIRES" The run-rime 
display dnver that CBASIC includes In your program is not just a simple display, but a full-featured display package. With 
Ihe Hi 'Resolution display package you can mix text & graphics, change characters per line, underline, character highfeghl, 
erase lo end of line or screen, home cursor, home & clear screen, protect screen lines, and much more. All commands 
are compatible wilh our HI-RES II Screen Commander so you can easily develop screen layouts using HI-RES and Color 
Basic before you compile your program The same appkes lo usng the 80 column card drivers What other Basic compiler 
offers you (his kind of flexibility? 



64K RAM SUPPORT 



CBASIC makes full use of the power and flexibility ol the 6883 SAM (Synchronous Address Multiplexer) in ihe Color 
Computer. Il will fuDy utilize the 96K of address space available in the Color Computer (64K installed) dunng program 
Creation. Editing and Compilation CBASIC has a special command (or aulomatic 64K RAM control When used Wi a 
program, it allows the user to use the upper 32K of RAM space automatically for variables or even program storage at 
tun-time. Il will aulomabcally switch the ROMs in and out when needed There are also two other commands thai allow 
you lo control the upper 32K of RAM manually, under program control No other Color Basic compiler directly supports 
the use ol 64K RAM like CBASIC 

ALL MACHINE LANGUAGE 

CBASIC is completely wnlten In fast efficient Machine Language, not Basic, like some other Color Basic compilers. 
Because of this. CBASIC can edit and compile very large programs Even using the Hi-Resolubon 51 by 24 fine display, 
il can work with aboul a 34K program, and the 80 column card versions can handle almost 40K of program Some ol 
the other Basic compilers can onfy work with 16K or aboul 200 lines Even working wilh large programs, CBASIC 
compiles programs with fcghtning fast speed II will compile a 24K program to disk in less than 2 minutes' That's without 
a listing being generated We've heard stories aboul some other compilers that lake almost 10 minutes to compile a simple 
2-3K program You might inquire aboul this when you look at some of Ihe olher compilers available. 



THE FINISHED PRODUCT 

Since CBASIC contains statements to support ALL of the I/O devices (Disk. Tape. Screen & Primer). Hi-Res Graphics. 
Sound, and Enhanced Screen displays, it is well suited for a wide range of programming applications It generaies a 
complete. Ready lo Run machine language program The (inished product or program does not have to be interfaced to 
a Bask program to perform some of its functions or commands This may seem obvious lo you. but some ol the olher 
Color Basic compilers don 'l necessanly work this way. Some of their compiler commands need a separate Baw program 
in order for them lo work. In some cases, require lhal a separate Basic program be interfaced lo Ihe compiled program 
lo perform I/O functions, like INPUT. PRINT and so on CBASIC doesn't do ths. ALL ol its commands are compiled 
into a ungle machine language program that does not require any kind of Basic program to make it work. 

COMPATIBILITY 

You may be wondering about those statements we made earlier concerning 99% or 99.9% syntax compatibility. What 
does thai olher I % consist of? The biggest part of that 1 % has to do wilh string arrays and variables. CBASIC does nol 
use a "String Pool" like Color Basic II uses absolute memory addresses to locale string variables and arrays This is why 
CBASIC s siring processing is so fast, il also eliminates the time consuming "Garbage Collecbon" problem When CBASIC 
allocales space for strings, it must know how much space to use for each string When you Dimension a string vanable 
m CBASIC. you must tell it how much space you want lo save for each element To Dimension an array of 40 stnngs. 
64 characters each, you would DIM DAS(40,64) If a string is not dimensioned. CBASIC will automatically alkxale 32 
byles for it II you want a single string lo have enough room for 200 characters you would DIM AX$f200l For stnng 
arrays, you would still access the element ycu want, the same as Color Basic, to gel string *30 from the array DAS, you 
would still use DAS(30), the only real change is In (he DIM statement For undeclared string arrays of 10 elements or 
less. CBASIC will automatically reserve space for 10 (0-9) strings of 32 characters In some olher Color Base compilers, 
you have lo declare EVERY string vanable used in the progrm in a DIM statement And. to create an anay of 40 stnngs 
with 64 characters each, you would have to DIM AD5(2560). and then lo access string *30. you would have lo multiply 
30 x 64 and use a special vanable name format or access il one character at a time Nol very compatible or convenient 
lo use. and difficult at best 

CBASIC REQUIREMENTS 

CBASIC tcqunes a minimum ol 32K RAM and al least one Disk dnvc Wc strongly recommend lhal you nave 64K 
CBASIC is compatible with all versions ol Color & Extended Basic and both Disk Basic VI.O and VI 1 Programs 
compiled on either system mil run on systems with dlKerenl ROMs CBASIC is NOT compatible with JDOS 

DOCUMENTATION 

The Documentation provided wilh any program is very important to the user. This is especially true when you tasV 
aboul a program as complete and complex as CBASIC. Even though CBASIC was designed lo be the most User Friendly 
compiler on ihe markel. we wenl lo great lengths lo provide a manual lhal is not only easy to use and understand, bul 
comprehensive and complete enough for even (he most sophisticated user The manual included with CBASIC consuls 
of approximately 120 pages of real information, nol like some manuals lhal put just one or two short paragraphs on a 
page If we did It that way, we could have easily created a Ihiee or four hundred page manual. The manual index brealis 
down each section of ihe manual and gives a 3 or 4 word description of each section and Its items along with page 
numbers The manual has three sections, the Editor. Compiler and Appendix Each of these is divided Into subsections, 
wilh Section and Subsection titles pnnted at the lop ol each page If you want to, you could find the mformabon you are 
looking for by simply flipping through the pages and scanning the Section titles on ihe lop of the pages The Manual itwU 
Is an 8fe by 1 1 Spiral Bound book wilh durable leather lextured covers Some of the reports we have had from CBASIC 
users desenbe the manual as being the Best program manual ihey have ever used 

COMPARE THE DIFFERENCE 

CBASIC Is not jusl another Color Basic Compiler II is the only complete Basic Compiler System for the Color Computer. 
Compare CBASICs features to what other compilers offer and you'll see the difference When comparing CBASIC lo 
olher compilers, you mighl want lo keep some o( mesc questions in mind. Does It support I/O functions? You can't write 
much ol a program without PRINT. INPUT and so on What about complex string statements, or string statements at aP 
How large of a program can you write? Can you compile a complex string ike: MlD$(raGHTS(DA$(VAL(INS),LENfLES)).3,3l? 
Can you use two character variable names for stnng & numenc variables, like Basic. Does il support all the Hi-Res graphics 
siatemenls including PLAY. DRAW. GET ard PUT. using the same syntax as Basic? Do you ever have to use a separate 
Basic program? Can you lake complete Basic programs and compile (hem without extensive changes? Will they work? 
How do you edit a program when it has enors compiling? 

PRICE VERSUS PERFORMANCE 

The price o( CBASIC Is SI49.O0. Il is Ihe most expensive Color Basic Compiler on the market, and well worth ihe 
investment We spent over 2 years writing and refining CBASIC. to make il the Best, most Compatible Color Base 
compiler available Most ol our CBASIC users already boughl one or more of the olher compilers on Ihe markel and 
have 5T.ce discarded them We even traded in a few of them. 11 you want a cheap compiler, we'll sell you one of those 
traded in. at a good pnee Before you buy a compiler, compare ihe performance of CBASIC against any Color Bas-c 
compiler Dollar for Dollar. CBAStC gives you more than any olher Color Basic compiler available 

ORDERING INFORMATION 

To order CBASIC by mail, send check or money order in the amount of S 149.00 plus $3.00 
for shipping and handling to the address listed below. 
To crder by VISA. MASTERCARD or COD. call us al: (702) 452-0632 (Monday thru Saturday. Bam to Spm PST) 



CER-COMP 

5566 Ricochet Ave. 

Las Vegas, NV 89110 

(702) 452-0632 
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Introducing The "Super Smart" 

DATA PACK II 

COMMUNICATIONS 
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Also Supports The PBJ 80 Column "Word Pak". Deluxe RS-232 Pak, 
Parallel Printer Card and PBJ 2SP Pak 

"FEATURES" 



Nit L<KI IninMii.tiMi, When Using Hi-Hi'snliilini. Display • >■■ 1 ll 

ASCII Cuniptitililv FiU 1 linm.il 

Full Ted HuflVrlnfl 

Termin.il Baud Roles 300 10 9600 

Allium. mi Word Wrap I J I mi nates Spin Words 

lull Hall Duplex 

Automatic File Capture 

ProgrammBblf Word Lenglh. Parity and Slop Hits 

Save and Inad Te»l Buffer and Program Kev BufffK m Top* 

iv Disk 

9 Hi-Kesnltiimn Display Formats, 2H In 255 » 24 

True Upper lower Case Display 

Kill Graphics Option (or an Flotra 6K 

Supports Line Break 



Freeze Display and Hevieu Information On Line 

Send Files Directly Irom Hurler ot Disk 

Full Disk Support for Disk Version 

Send Control Codes front Keyboard 

Separate Printer Baud Kates 1 10-9600 

Display on Screen or Outpul Contents o( Buffer to Printer 

Automatic Memory Sense Id-fclK 

9 Programmable Function Key Variable l.t-ncjih Macro Buffer 

Protjrainiiiable Prompt Character or Delay 10 Send Ne»t Fine 

Programmable Control c haracter Trapping 

Proqrammable Open Close BuHer Cbararlers 

Automatic Key Kepeai For Fdilinn. 

Program and Memnrv Status Displays 



TAPE 
s 34.95 
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"The Source" 

has arrived! 



Starship Falcon 

Graphics Adventure Game 



The Source brings the cost of Disassembler and Assembler Source code 
generation down to Earth. 

Now you can Disassemble Color Computer machine language programs and generate 

beautiful. Assembler Source Code for a fraction of the cosi of other Disassembler/Source 

Generator programs. 

The Source has all the features and functions you are looking for in a Disassembler. 

• Automatic label generation. 

• Allows specifying FCB. FCC and TOB areas, 

• Disassembles programs directly from Disk. 

• Supports multiple origin disk Hire. 

• Outpul complete Disassembled listing with labels to the Printer. Screen or boU). 
•Generates Assembler mmpauble source files directly todisk. 

• Generated sowve files arc in standard ASCII formal thai «ui be edited by most word processors. 

• Built in I lex/Ascli dump/display to help locate KCB. FCC and FDB areas In a program. 
■ Fast Disassembly mode for testing* checking FCB. FCC and FDB mapped areas, 

• Built In Disk Directory and Kill file commands. 

• Menu display with single key commands (or smooth. Easy, almost foolproof operation. 



32K Disk $34.95 



Six months ago a terrorist group demanded to be designated the rulers of 
Alpha Sigma III. under the threat of world starvation on the planet Earth. The 
Federation denied their demands, so they released a biological weapon which 
has destroyed all known edible plant species from throughout the known gal- 
axy. To date no plant life has been able to survive on Earth. Recently. Federation 
undercover agents have reported a story told by a roving space trader, of a 
planet with abundant edible plant life. These plants have a reputation of being 
able to survive in all climates and in fact, are supposed to grow at an incredible 
rate. The Federation is desperate! If Earth's food source is not replaced soon, 
the Federation will have to evacuate all animal and Human life. Your mission 
is to go to the planet Zephyr and obtain the seed of these plants and return to 
Earth. Several Federation agents have been sent to obtain the seeds and none 
has returned! Can you get the seed and survive??? GOOD LUCK! 



32K Disk $21.95 
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NEW IMPROVED VERSION 

- UP TO 85 CHARACTERS PER LINE 
READABILITY 

- ADJUSTABLE AUTOMATIC KEY REPEAT 

- PROPTECT 1-23 SCREEN LINES 

- CONTROL CODE KEYBOARD 

■ i-ui i.\ BASIC COMPATIBLE 

■ DISPLAY FORMATS 01 2H in 255 CHARAI II RS PER LIN! 

• I" 16 UPPER/I OWI RCASE CHARACTI RS 

• MIXED GRAPHICS ,'i TEXT OH SEPARATE 
GRAPHICS: TEX1 SCRI I NS 

• INDIVIDUAL CHARACTER HIGHUOHTINO 

• REVERSi CHARACTER HIGHLIGHT MODE 

• WRITTEN IN FAST MACHINE IANGIIAGE 
■AUTOMATIC RELOCATES TO TOP 01 111 i-'K 

• Al ITOMATICAI I .Y SI WORTS MK< >l RAM Wl II I HI si Ti ( INTROI - 

• HI VI RSI SCRI I N 

• ON SCREEN UNDERI Nl 

• DOUBLE StZECHARACTI Rs 

• ERASE rOENDOF I INI- 

• ERASE TO END OF SCRI I N 
- HOMI CURSOR 

• BELL TONE CHARACTER 

• HOMI CURSOR & n I AH SCRI I N 

■ HIl.H IIRESONI V 2K nl RAM 

■ COMPATIHI E Wl 1 1 1 Al I I 'API & I HSK SYSTI MS 
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Screen Enhancement Program Comparison Chart 
PROGRAM FEATURES HI-RES II HI-RES I BRAND X 

NEW OLD 



Upper/Lower caw i iiaractersYei 
Mixyd Text fliul C.Mphics Yes 
Separate Text & Graphics V,-* 
Pun! © fullv iinpli'nu'nled Yes 
Prlni ■' on .ill hne lengths Yes 
Difl.'ii'nl line I.'nglhs 
Automatic Ki-v Rep...« 
Adjustable- Rev Repeats 
Auto Repeal rnsable 
Erase to end nl line/screen 

I lome Cursor 
Solid in Blinking Cur .01 
CLS comm.unl SUppi «ted 
X. Y Coordinate Cursoi 

Positioning Yes 

Double Sim Characters Yes 

lniliiiilu.il/Ciinlliiunus 

1 Ijgnhghttng 
On Screen Undi-tliiiing 
Cleat Ki'y lunrllnnal 

Id 12 A i.IK Supported 

( ireen 01 Blaclt Background 
CO101 Yes 

Dual Charactei sels loi 
f nhanced 64 and H5 
Characien pel line displ.w Yes 

Protected Screen I [ties 

ini, "iMmmnhle) I In 2M 

Full Control Code Keyboard 

lot Srrt'i'n cnnlrol ititt'rtlv 

Irom Ihe kevboard ¥« 

F'focjr.imin.ibl!' T.ib Chdtiii-ti'i 

Spacing Yes 

I utl S ■ 1 Ri'vi-i^. runctfrmYet 

Swilrh |o K lii.iu ihe St.ind.srd 
16 by 32 Screen lor lull 
compalabllitu Yes 

On Erroi Goto I unction No 

Extended Baw Ri'iiuurd No 

AIIM,Klmirl.milii,ii>.|'i,i,ir.iiiiS , .'s 

R.AM Required In addition In 

s. i.vn RAM 2K 

Program Pre-.' iTapel 124 15 



Yps 

Yes 

Yes 

Yes 

Yes 
2Xlo25 ^ ■l'l)2Xlo255l , 
Yes Yes 

Y.is No 

Yes N.i 

Y,.s Yes 

Y« Yes 

Y,-s No 

Bull/Riack Bull/Blvck 

Yes 
Y,.> 

Y«i Y« 

Y,~ >',- 

Ck-ar/L keysClimr key 

Yes Yes 



No 



No 
Y« 



No 
No 
Yes 

\... 

2K 
$1995 



Yes 

Yes 

No 

Yes 

51 only 

51 only 111 

Y.- 

No 

No 

Yes 

Yes 

Yes 

Bun/Black 

No 
No 

No 
No 
No 
Yes 



No 
No 



No 
No 



No 
Yes 
Yes 

Yes 

2K 
$2995 



VISA 

VISA, MASTERCARD AND C.O.D. ACCEPTED 



DOWNLOADS 



Communication 
Breakdown 



By Dan Downard 
Rainbow Technical Editor 



• The columns by both Lawrence Folk and 
James Reed, together with the two-page ad 
(pages 26 and 27) in the November 1985 
issue of rainbow did it to me . . . 1 rushed 
out and bought the R/S DCM-3 Modem, 
a four-pin connection cable, a phone line 
adaptor, and proceeded to hook everything 
up, as per instructions. 

I plugged the DCM-3 into the serial I/O 
port on my Color Computer, made sure 
every other connection was correct, and then 
(following instructions in both the DCM-3 
manual and the directions on Page 27 of the 
ad) I breathlessly dialed the local Tymnet 
number, got the carrier, tapped the connect 
bar and hung up. The Carrier Detect Indi- 
cator lit up to indicate that I indeed had the 
signal and I waited for "the message. " Now, 
I know you're not going to believe this, but 
nothing happened! 

What gives? Where have I gone wrong? 
The ad more or less assumes thai I am fully 
knowledgeable about modems, and further, 
that I have the capability of changing such 
variables as the Baud rate, the word length, 
parity (whatever that means) and the 
number of stop bits. Who does, and how? 

J.C. Woodson 
Burlingame. CA 

Boy. James, it sounds like you have 
trouble. Since I usually use Uninel, 1 tried 
using Tymnet just to see if it worked. It 
worked just like the instructions in the 
November RAINBOW. 

Just for your information. I was using 300 
Baud, seven bits and no parity. According 
to the Delphi manual, your terminal should 
be set for eight-bit ASCII and one stop bit. 
The manual also states that you may have 
to experiment. I haven't figured that state- 
ment out yet. 



Dan Downard is an electrical engineer 
and has been involved in electronics for 
25 years through ham radio (K4KWT). 
His interest in computers began about 
six years ago and he has built several 
68 XX systems. 



The reason the instructions mentioned 
that you may receive a garbled message 
prompt is because the Tymnet introduction 
is sent at 300 Baud. Tymnet will not sense 
that you are sending at 1200 Baud until you 
do something. You did not mention the use 
of an RS-232 pack, so I assume you are using 
300 Baud. also. 

I have two suggestions: Try contacting 
Tymnet to see if there's some kind of prob- 
lem in your area, or try using Uninet. 



Error Trapping 



• / have a CoCo 2 and generally run on 
Color Disk basic, although I also have OS- 
9 and BASIC09. 

I have some programs I am trying to 
develop and desperately need an error trap 
of some sort. "On error" doesn't exist for 
these systems, and I am wondering if there 
is some way a routine could be written to 
recognize any of the error messages that 
come up, specifically the one that comes up 
when the cursor hits the edge of the screen. 

Other Tandy basics have an "on error" 
trap. Do you know why it was left out of 
Color BASIC? 

Henry V. Leih 
Black Canyon City, AZ 

Henry. I really don't have the slightest 
idea why error trapping was left out of Color 
BASIC. I would guess there just wasn't 
enough ROM memory left to include it. 

I know of several different commercial 
programs that offer the addition of error 
trapping, such as JDOS, SuperScreen by 
Mark Data Products and 64K Screen Ex- 
pander by Computerware. You mention that 
you have BAS1C09. It also has error trapping. 

I don't think an error will be generated in 
Color basic when the cursor hits the edge 
of the screen. The only suggestion is to 
PEEK ( 8.H8B ) . This will give you the current 
address of the cursor. From there, you are 
on your own. 

Another suggestion is to experiment with 



RAM hooks at S0I8E and £0191. These 
vectors were reserved for error trapping by 
Microsoft. 



Getting BASIC09 Loaded 

• / have purchased a great amount of 
hardware and software after reading articles 
and advertisements in your magazine, espe- 
cially "KISSable OS-9" and ads for Color 
Computer products. I bought a 64K Color 
Computer, one disk drive, OS-9, BASIC09 
and The Complete Rainbow Guide to 
OS-9. 

The problem is that I can 't seem to find 
the proper instruction for loading BASIC09. 
Page 2-2 of the BASIC09 Reference Manual 
says after the OS9: prompt enter BASIC09 
and you gel the prompt 'B. All I get when 
I do this is Error #215. 

I took the BASIC09 back to Radio Shack 
and they replaced it as defective, but the new 
one does the same thing. After staying up all 
night for three nights studying The Rainbow 
Guide (which doesn't show how to load 
HASIC09) and the OS-9 manuals, I am still 
lost. 

Could you please give these instructions 
or explain the cause of the problem I'm 
having? 1 have been programming for about 
four years in BASIC and assembly language 
and use five computers, including an IBM 
370. 

Ray Pitts 
Experiment, GA 

Ray. according to my OS-9 documenta- 
tion. Error #215 is "bad pathname." Most 
of the time I think you will get Error #2 16, 
or "pathname not found." The problem you 
are having is due to the fact that you must 
have BASIC09 in your current execution 
directory. There are two ways to accomplish 
this. 

The first is to copy BASIC09 from your 
BASIC09 master disk to your OS-9 system 
disk. Assuming you have two drives, the 
procedure would be as follows: 

1) Boot OS-9. Leave the system disk 
(preferably a backup) in Drive 0. 

2) Insert your BAS1C09 disk in Drive I. 
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3) Type:CDPY/Dl/BR5IC09/D0''CMDS/ 
BA5IC09 

4) Remove the BAS1C09 disk from Drive I. 

5) Type: BRSIC09 

The easier way to accomplish the same 
result is to change your execution directory 
to Drive I. where the BASIC09 program 
resides. You do this by typing CHX /Dl. 

If you have only one drive, you can only 
use the first method. After COPY in the 
command line, insert a "-S" to make it a 
single-drive copy. 

I suggest reading your OS-9 manuals to 
become familiar with the two different 
directories (data/ working and execution) 
used by OS-9 to further clarify this problem. 



Fickle Files 



• / have a 64 K CoCo revised 'D' board, one 
disk, standard BASIC 1.1, Extended BASIC 
1.0 and Disk BASIC 1.0. 

My question concerns the FILES com- 
mand. The manual stales thai you can 
increase the disk buffer size with a command 
such as FILES 1,1000. However, even after 
issuing this command, data is still written lo 
the disk as soon as 256 bytes accumulate in 
the buffer. Can you explain how to increase 
I he size of the disk buffer so data is written 
to the disk less often? 

Tom Veik 
Columbus. NE 

Tom. the disk structures of Disk basic 
and OS-9 call for disks to be formatted with 
a sector length of 256 bytes. Data will always 
be written in groups of 256 bytes, whether 
you are writing one or 1,000 bytes. 

Why use the FILES command? When 
dealing with random files, if a record is 
longer than 256 bytes, you have to reserve 
buffer space for the number of bytes in the 
record. Otherwise, the default value of 256 
is used. 



Jimmying the Joystick Plots 

• Is there any way lo gel belter plots on my 
joystick than 0-60 horizontally and 0-60 
vertically? Perhaps 0-255 horizontally and 
vertically? 

Brandon Rhodes 
Andover, MA 

The limiting factor for joystick resolution 
is the analog-to-digital converter inside your 
CoCo, Brandon. Only a six-bit A-to-D 
converter is used. 

If you wish to experiment with 256 by 256 
joystick resolution, try CoCo Max by 
Colorware. An eight-bit A-to-D converter is 
in the "black box" that comes with the 
software. Adequate instructions are given in 
the manual for using it for custom applica- 
tions. 



Keyboard Replacement 

• / recently purchased a replacement key- 
board for my CoCo. It's available at many 
Radio Shack stores for $4.95 under part 
number 277-1019. While the keyboard is not 
described as a CoCo pari, it fits perfectly on 
my CoCo 2 and all the standard keys work 
as before. However, the keyboard routines 
in the ROM do not correctly produce the 
codes for Control and All. the two function 
keys. This problem is a software problem 
and does not particularly concern me. What 
I would like lo do is use this keyboard on 
an older CoCo that has a different ribbon 
connector. Where may I obtain an adapter 
that allows this keyboard lo he used with 
older Co Cos? 

Tim Keith 
Seguin, TX 

An adapter is available for connecting the 
ribbon cable to the older type of pin connec- 
tors. I bought mine from Spectrum Projects. 
Unfortunately. I don't know the pari 
number, but maybe some of our readers will 
help. 



Looking for a Driver Program 
for TTY Terminals 

• I have noticed from several articles in your 
" Downloads" section thai you seem lo have 
some experience with interfacing CoCo and 
TTY. We are slur ting a club project lo sei 
up a BBS for people in our area using TTY 
(teletypewriter) terminals for the deaf Some 
are A SC1I compatible, hut most are not. We 
currently run a modified Rainboard using a 
version of your remote terminal driver 
program from the November 1983 RAIN- 
BOW. We are looking for a similar program 
thai would he compatible with the five-bit 
Baudot protocol used by telecommunica- 
tions devices for the deaf We have the TDD- 
43 program from CompuServe, hul it will 
not work for our purposes as ii uses the 
cassette port instead of lite serial port for 1/ 
O. Do you know of any driver program we 
can use. or have suggestions for modifying 
your driver program? 

Mac Knight 
Yakima. WA 

One of the first articles I did for I HI 
RAINBOW was using nonstandard software 
and hardware with the CoCo. If you can find 
a copy, look for February 1983. In this 
article is a machine language driver for using 
a Baudot printer with your CoCo. It is not 
exactly what you are looking for, but it will 
head you in the right direction as far as 
writing a program using "look-up tables." 

If enough people write, we'll rewrite 
Remote for Baudot use. With the number of 
Model 28 and 32 ASCII machines available, 
I didn't think anyone was using Baudot 
anymore. 



More on OS-9 Uploading from the Ml 00 

• / am writing in response lo a letter in the 
January 1986 " Downloads" from Allan 
Wysocki. He. like myself, has found he can 
download Jiles from his CoCo running OS- 

9 lo his Model 100. but has trouble upload- 
ing from the Model 100 to I he CoCo. The 
problem is the 100 sends the file until il 
receives an XOFF, so what is needed is a 
device driver that supports XON/XOFF. Tl 
does not, as far as I know. Several of the T2 
drivers, including the Tandy 72. do support 
XON/XOFF. I have found that using any 
of these 1 can download at any Baud rale, 
including 19200. however, the best. I have 
been able to do on an upload is 3011 Baud. 
This is the selup I have found to work best. 
First. I use the Tandy T2 set at 300 Baud, 
the 100 hooked to T2 with an RS-232 cable 
and null modem. I use TSMON and logon 

10 the CoCo with the 100's Telcom set to 
38N1E. 

I 'm ready to upload, but here we run into 
another problem. " Build" does not seem to 
work with this selup. What I use is a pro- 
gram written by Bill Brady called XI) PL 
that can he found on CompuServe 's OS-9 
SIG. I type XUPL FILENAME on the 100. 
XUPL opens a file and responds by telling 
you thai il is ready and to press ESC when 
done. Now you can upload most files by 
hitting function key '3 'on the 100. If you gel 
errors, such as t/244 or 11216. then use 
X MODE I T2 -EC HO and set the 100 to half 
duplex and try your upload again. 

The reason for this problem appears lo be 
that after the CoCo sends an XOFF. the 100 
may still send some characters before il can 
react to the XOFF. These characters cause 
an Error #244 (keyboard buffer overflow) 
and then maybe some U2l6s (pathname not 
found). If you are using one of the other T2 
drivers that support XON. these extra 
characters are lost but the upload will not 
abort on errors. What we really need is for 
someone to write a new driver thai continues 
lo accept the incoming characters until the 
100 stops sending. The Tandy T2 seems lo 
do this, but must not have a big enough 
buffer. 

Wayne Miller 
Westminster, CA 

Where there's a will, there's a way. Wayne. 
Thanks for your help. 



Your technical questions arc welcomed. 
Please address them to: Downloads, THE 
RAINBOW, P.O. Box 385, Prospect. KY 
40059. We reserve the right to publish only 
questions of general interest and to edit for 
space and clarity. Due to the large volume 
of mail we receive, we are unable to answer 
letters individually. 

Your technical questions may also be sent 
to us through the MAIL section of our new 
Delphi CoCo SIG. From the CoCo SIG> 
prompt, pick DELPHI MAIL, then type 
SEND and address TO: DANDOWNARD. 
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OS-9 



LEARNING OS-9 

How to deal with errors, their message 
types and the conditions under which 
they occur 

The Utility Room 



By Brian A. Lantz 



Welcome back to "The Utility Room." In your 
home, a utility room is usually used to store and 
keep a variety of things. It is the place where just 
about anything at all can be found! That is what makes this 
article different. Along with learning additional program- 
ming skills, I hope you find a different, creative point of 
view. As a programmer, your most valuable resource tool 
is your imagination. Coding a program is not difficult, but 
creating the idea that later becomes the program is the most 
difficult phase of programming. Therefore, some of the 
content of these articles leans to the abstract. I hope these 
thoughts and ideas will develop into different and exciting 
ideas for OS-9. 

This month, we'll deal mainly with errors, error messages 
and error conditions. We will first classify these, then look 
at the differences between types of errors and their 
messages. 

Your Enemy: The Error 

Here is a proverb for all of you philosophers — "An 
enemy is usually someone that you don't know well enough 
to consider a friend. "This is the type of enemy the standard 
error is. All you need to do to make it your friend is get 
to know it. Anticipate its every move. Take advantage of 
its weaknesses and be cautious of its strengths. When you 
start doing this, you will be in control of the error. 

Types of Error Messages 

There are five basic types of error messages. 1 will refer 
to these as the "five S's": silent errors, slovenly errors, sober 
errors, smart errors and social errors. Let's look at each of 
these types of error messages. 



Brian Lantz lives in Tampa, Florida, and is president 
of the national OS-9 Users Group. He is a free-lance 
programmer, with programs carried by Tandy, 
Computerware and Frank Hogg Laboratories. He has 
developed much of the commercial OS-9 software 
released in the last rear. 



1 ) Silent — This is the "no message" error message. For 
example, you've spent the last six hours working on a 
program. You do not have a backup copy of your work. 
You go to exit your text editor and suddenly the system 
crashes for no apparent reason. Whether you know it or 
not, you just received an error message. 

2) Slovenly — This is a vague and non-specific error 
message. Receiving this kind of message is better than 
getting a "no message" message, but it doesn't tell you a 
whole lot. A typical example of this is an I/O Error message. 
This could be one of several dozen actual error conditions. 

3) Sober — This is a message that is specific, but does 
not give you much information by itself. The OS-9 FSPERR 
(PRINT ERROR) routine is like this. It tells you exactly 
which error occurred, but most of us need to pick up our 
manuals to find out what this really means. This kind of 
error message is usually the most specific and the least 
friendly. 

4) Smart — This is a message that is specific, but still 
a little vague. An example of this is a "can't open input file" 
message. This is specific as it relates to the problem, but 
it is vague in its explanation of the cause. 

5) Social — This is the user-friendly type of error 
message. It is both specific and informational. It tells what 
kind of error occurred and gives you enough information 
to figure out the solution. It may or may not give as specific 
an explanation of the cause as the sober message does. The 
key feature of this message is that you are given the full 
"picture" at the time of the error. To convert the smart 
example to a social one, you would receive either "input file 
doesn't exist" or "you have no permission to use input file." 

Which one is the best of the five S's and which one should 
be used in your programs? Well, the answer is all of them! 
You will probably use each one at one time or another. As 
a general rule, though, we will try to use the smart and social 
messages whenever possible. That doesn't mean exclusively, 
just preferably. 

Types of Errors 

There are really only two types of errors, fatal and 
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WAR GAMES 





ARK ROYAL GAMES celebrates the New Year with reduced prices on all 
games. ..even our two newest releases! 



new! SAGA-THE SORCERER'S 
CORSE 32K 100% hi-res, 100% ML 
graphic adventure. Fantastic! — $22 

new! REDSTAR 32K 100% hi-res 
100% ML. Futuristic wargame involv- 
ing NATO and the WARSAW 
PACT.— S22 

BARBAROSSA 64K 100% hi-res 
100% ML game of the war in Russia 
1941-1944. "A Blockbuster," says 
Hot Coco's Peter Paplaskas. Reviewed 
Jan. '86 Hot Coco.— $25 

D-DAY Our second 64K 100% hi-res 
1 00% ML, this one dealing with the Al- 
lies invasion of France in 1944. Mas- 
sive! No review date set yet. — $23 

PHALANX 32K 100% hi-res, 100% 
ML game of Alexander the Great. No 
review date set yet. — $20 

ANZIO 32K Semigraphic wargame. 1 
or 2 players. Simultaneous movement. 
No review date set yet. — $20 

COMPANY COMMANDER 32K ML 
routines. Tactical squad level wargame 
set in WWII. 12 scenarios, add-on ex- 
pansion modules. Dec. '85 Rain- 
bow. — $23 disk or tape 

RIVER CROSSING 32K ML routines. 
A Company Commander add-on mod- 
ule, but you no longer need C/C to play 
it.— $23 







CINCPAC BATTLE OF MIDWAY 32K 
1 00% hi-res 75% ML. The battle that 
turned the tide of war. Aug. '85 
Rainbow. — $20 

ESCAPE FROM DENNA 32K ML rou- 
tines. Semigraphic Dungeon adventure 
game. No review date set yet. — $18 

BATTLE OF THE BULGE 32K Semi- 
graphic wargame. 1 or 2 players. Aug. 
'85 Rainbow.— $15 

BATTLE FOR TUNIS 32K Semigraph- 
ic wargame. 1 or 2 players. Sept. '85 
Rainbow.— $ 1 5 

ACROSS THE RUBICON 32K Semi- 
graphic wargame. Feb. '84 
Rainbow. — $ 1 5 

WATERLOO 32K ML routines. Semi- 
graphic wargame. Mar. '84 
Rainbow. — $ 1 5 

KAMIKAZE 32K Hi-res graphic war- 
game. Apr. '83 Rainbow. — $15 

BOMBER COMMAND 32K disk, 16K 
tape. Semigraphic wargame. ML rou- 
tines. Jan. '84 Rainbow. — $10 

GUADALCANAL 32K Semigraphic 
wargame. ML routines. — $10 

THE POWER OF THE TRS-80 COM- 
PUTER Book. Loaded with great 
programming information. — $10 
(Shipped book rate) 



Prices on all programs include shipping lo U.S.. APO's. Canada. COD's (USA only) 
add 10%. Florida Residents add 5°l. For disk version add S2. All Orders shipped 
within 24 hours. Programs require Color Computer TM (Tandy Corp.) or TDP Sys- 
tem 100 Computer TM (RCA). Many programs soon to be available on MS-DOS 
systems. 



P. O. Box 14806 
Jacksonville, FL 32238 

(904) 786-8603 




IF YOU HAVE EVER 

OWNED A "Y" CABLE 

YOU KNOW HOW EASY 

IT IS TO 'BUMP' OR 
DISLODGE THE CABLE 
FROM THE COMPUTER. 
WITH THE POSITIVE 
MECHANICAL CON- 
NECTION OF THE "Y 
BOX" CHANCES ARE 
GREATLY REDUCED OF 
THE "Y" COMING 
DISLODGED. 



i i i i i i i rrm mi 1 1 i i rri i i i mr i mm 



I I M I I I ITTT 



rn~ 



M I M II 



ONE OF THE MOST 
COMMON CAUSES OF 
A SHORTED DATA BUS 

IN THE COCO IS A 

MISALIGNED OR LOOSE 

"Y" CABLE. DON'T LET 

YOUR COMPUTER BE 

THE NEXT VICTIM OF A 

"Y" CABLE. ORDER THE 

"Y BOX" FROM 

COMPUTIZE. 



NOISE FREE "GOLD CONTACT" TO 
YOUR COMPUTER 
POSITIVE MECHANICAL AND 
ELECTRICAL CONNECTION 
ONLY $24.95 

CHECK OR M.O. . 
ADD $3.00 SHIPPING & HANDLING 
PA. RESIDENTS ADD 6% SALES TAX 



sm 



(215) 946-7260 P.O. BOX 207 • LANGHORNE. PA 19047 



nonfatal. A fatal error is any condition that prevents the 
program from continuing in its normal operation. These can 
range from errors that cause a system "crash" to ones that 
occur because other programs, or files, that are needed 
cannot be found or loaded. A nonfatal error is one that can 
be "worked around," that is, an error with which you can 
simply print out a message and resume operation. 

There are some occasions where, due to the way a 
program is written, an error is treated as a fatal one when 
it could have just as easily been regarded as nonfatal. A 
familiar example is if you give the LIST command (or our 
CAT command) three files to print and the second one does 
not exist, then a fatal error occurs and the third file does 
not get printed. This could have been programmed to print 
out an error message and continue on to the next file, but 
the original programmer made this a fatal error instead of 
a nonfatal one. 

Types of Error Conditions 

Here's where OS-9 becomes your ally in the fight against 
the dreaded error. OS-9 system calls usually do all the work 
of determining an error. With most of the system calls, the 
carry bit of the Condition Code register tells you if an error 
occurred. If the carry is set, then an error occurred and the 
error number is usually contained in Register B. If the carry 
is clear, then OS-9 did not detect an error. 

True, most I/O errors and fatal system errors are easily 
detected by the system calls without a lot of additional 
programming on your part, but that doesn't mean you can 
relax in your dealings with errors. It simply reduces the 
number of errors to which you need to give your attention. 
If you wish to be a good programmer, you must think 
through every possible error that can happen, whether it can 
occur because of improper operator input or hardware 
limitations. 

Error or Bug? 

Let's clarify one other thing before we start our coding. 
A bug is not an error and an error is not a bug. An error 
is a condition that can occur outside of the program's 
control. A bug is an oversight on the part of the pro- 
grammer. 

Though bugs and errors are separate, they do sometimes 
relate closely. Some errors can lead to the discovery of 
otherwise hidden bugs. As an example, I know of a word 
processor for the CoCo that is flawless in every way, except 
for one. If, in the course of use, the word processor fills a 
disk in the midst of saving text, the program goes totally 
nuts. This error (disk full) was not handled properly by the 
programmer, thus, a bug is born. However, this bug will 
never occur unless it is assisted by an unbridled error. 

End of the Cat Nap 

Now for some serious coding. If you examine Listing I, 
you will see that it is essentially the same listing as in 
December's issue, with several additions. One change is that 
the line numbers (which are only for reference) are now 
enclosed in parentheses. Remember, if you are entering this 
program (CAT), do not put in these line numbers. 

The first addition in this month's listing is at lines 236 
and 237. This is a new error message. Its use will be 
explained in a moment. A minor change has been made on 
Line 450. A label (CAT42) has been added. There are two 
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FSHS 


X 


LEAX 


ERROR. PC 


LDA 


OSTDOUT 


LDY 


#1 


OS 9 


ISBRITLN 


PULS 


X 


BRA 


BEGIN 



additional lines al 451 and 452. I had left in a deliberate 
bug. and no one caught it! These lines correct this bug. Let's 
see if you can figure out what that bug was. 

Separate the Files 

A "clean-up" has been added in lines 480-487. Line 480 
has been changed to branch if all is done to label OUT. Lines 
481-487 are listed here: 



save parameter pointer 
ERROR. PCR point to a line feed character 

this is going to standard output path 
only one character to output 
print ic I (separates files) 
restore parameter pointer 
go back & LIST another file 



First, the parameter pointer in Register X is saved, then 
'X' is pointed to a line feed character, like the first character 
of the error message. This character is output. A line feed 
was chosen instead of a carriage return to make this work 
easier with other utility programs, such as a word count 
utility that counts all carriage returns as separate lines. 

And on the Subject of Errors 

The biggest section of code added was to change an error 
condition from fatal to nonfatal. This change was made to 
the "open file" routine. Now if a file cannot be opened, the 
error message "cat: can't open filename" is displayed and 
the next file is processed. Previously, this error would return 
to OS-9 with the error number and the additional files 
would not be viewed. Lines 280 and 290 were changed and 
22 lines were added between them. 

The first section (shown here): 



STA 


.1* 


CMPA 
BEQ 
CHPA 
BNE 


»$f>D 
CAT'. 
• S2JJ 
CAT3 


LDA 
STA 


#S?D 



and place it in the buffer 

end of the command line?? 

yes, all done u/the name 

else, end of the filename?? 

no, loop back till name done) 

else, get a <CR> 

and place it at the end of the name 



copies ihe filename that couldn't be found into the buffer 
and makes sure it is terminated with a carriage return. 
Next, the parameter pointer is adjusted and saved: 



CAT4 



LEAX 
STX 



-l.X 

PRHPTR 



back up the parameter pointer 
and store the new value 



LEAX 


ACCESS, P 


LDY 


• 17 


LDA 


*2 


OS 9 


ISWRITLN 


LEAX 


BUFFER, U 


LDY 


VBUFSIZ 


OS 9 


ISWRITLN 


BRA 


CATM 



CHPB 
LBNE 



«216 
EXIT 



"FILE NOT FOUND" error 11 
no, exit program (troubles) I 



checks to see if it was a "file not found" error. If it wasn't, 
then it is treated as a fatal error since something must be 
wrong with the disk itself. 

The second section of this additional code: 



LDX PRHPTR else, point to the filename 

LEAY BUFFER, U and the buffer 

CAT3 LDA ,X+ get a character from the name 



Lastly, the "cat: can't open" portion of the message is 
printed, followed by the printing of the filename that was 
copied into the buffer: 

ACCESS, PCR point to the access error msg 
ic is 17 characters long 
output to standard error path 
and write the 1st part of msg 
now point to the copied name 
set length to maximum 
and write out the filename, also 
go back for another fllo 

And Now, a Gold Star for the Class! 

As an added bonus, 1 present Listing 2. This is the error 
utility command from the Unicharger utility package, 
distributed by Frank Hogg Labs, which is appropriate since 
we have been talking about errors. This is a very simple 
program that takes a decimal error number and prints the 
description from the ERRMSG file. It assumes this Tile is 
located in the /DO/ SYS directory. If you have this in 
another directory, simply change the string at the label 
ERF1LE to reflect the position of the ERRMSG file in your 
system. 

This listing is supplied for personal use only. 1 hope you 
can get use out of it. 

A Look at the Mail Bag 

Several good ideas have come in the mail recently. If you 
have an idea for a good utility command that we can tackle, 
drop me a line. Also, if you have problems understanding 
certain items within the OS-9 environment, let me know: 
I'll try to explain them further. □ 



Editor's Note: Although OS-9 programs arc not included on RAINBOW ON TAPE, Ihe following program listings are now availabl 


p for downloading from 




our new Delphi CoCo S1G (th 


ere is a S3. 50 per program surcharge). From Ihe CoC'o SIG> prompt, pick DATABASE and then. 


RAINBOW ON TAPE 




to access these programs. 










Listing 1 


: 








(i) 

(2) 


* CAT Utility Command version 2 


* 




(3) 


* 




* 




(4) 


* 


syntax: cat [+numl] [-] [num2] [filename] {.... ) 


* 




(5) 


* 




* 




(6) 


* 


Copyright 1985 Brian A. Lantz 


* 




(7) 


* 


All rights reserved 


* 




(8) 


■>v 




* 




(9) 


* 


Copies input from specified file(s) (or standard 


* 




(10) 


* 


input) to standard output . 


*■ 




(11) 


*5WbWWr*fWWW^^ 




(20) 










(30) 




NAM CAT 






(40) 




IFP1 






(50) 




USE /D0/DEFS/OS9DEFS 
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Educational Programs 



^ Questions ? ? 
• * • 

Questions — a powerful, easy lo use, 
authoring program! Questions has as 

many uses as its owners have creativity. 
Teachers have used Questions to develop 
pre and post tests, to make copies ot the 
same test with questions in a different 
order, and to review and reinforce difficult 
lessons with their students. But Questions 
is not limited to school uses. Enterprising 
people have found other uses for it. Party- 
givers have used it to personalize games 
For baby and wedding showers, and for 
creating their own trivia games. Adminis- 
trators have used it for inservice training. 
Children have written their own riddles 
with it. If you own Questions, you'll find a 
way to use it. You will also be pleased with 
its many fine features: 

* Word processing commands that al- 
low you to make changes as you type 

* Screen commands so you do not have 
to constantly refer to the manual 

* Options to take the quiz on the com- 
puter or to print a hard copy of it 

■*■ Sequential or random presentation of 
questions 

* The ability to print the same test with 
questions in a different order 

* The printing of an answer key 

* The option to use expanded printer 
lettering to create large print tests. 

* The ability to save quizzes to cassette 
or disk 

* A review feature which permits stu- 
dents to study questions that have 
oeen missed 

* A record keeping system 

* Multiple choice, true/false, or fill 
in the blank formats. 

Questions is truly a professional authoring 
program that meets the needs of all of its 
users. 

16K ECB - Cass. S19.95 

32K ECB - Cass. $24.95 

32K Disk - S2B.95 

***************************** 

Reading Comprehension Series 
Grades 2 ■ 4 

B5's Reading Comprehension Series is a 
set of data files to be used with the Ques- 
tions program described above. Each file 
contains over 100 questions, organized 
into 6 to 8 sequential lessons. Lessons 
build from simple to complex. This series 
emphasizes the thinking aspect of reading. 
Simple sentence structure allows the stu- 
dent to concentrate on thinking skills. 

Main Idea * Sequencing 
Fact & Opinion * Cause & Effect 

Each Title: Cassette - S10.95 
Disk S12.95 
Complete Series ol 4 Titles: 
Cass. - $39.95; Disk - $41.95 

^_^ Most B5 programs are available 
CF through Radio Shacks Express 
Order. 

A wademirk of Tandy Coip 




B-5 Software Co. 

1024 Bainbridge Place 
Columbus, Ohio 43228 
Phone (614) 276-2752 



(60) 


ENDC 








(70) TYPE 


SET 


PRGRM+OBJCT 




(80) REVS 


SET 


REENT+1 






(9?) 


MOD 


THEEND , CATNAM , TYPE , REVS .BEGIN , CATMEM 




(100) CATNAM 


FCS 


"Cat" 






(11?) 


* 








(120) BUFSIZ 


EQU 


200 






(125) MULT 


EQU 


If 






(130) 


ORG 


9 






am 


* this 


is the beginning of the data area. 




(150) IPATH 


RMB 


1 


this is the input path # 




(155) COUNT 


RMB 


2 


line counter 




(156) FROM 


RMB 


2 


to store "linel" 




(157) TO 


RMB 


2 


to store "line 2" 




(160) PRMPTR 


RMB 


2 


this is the parameter pointer 




(170) BUFFER 


RMB 


BUFSIZ 


this is the input buffer 




(180) 


RMB 


200 


this is the stack's memory 




(190) 


RMB 


200 


the parameter area is here 




(200) CATMEM 


EQU 




this ends the data area 




(210) 


* 








(220) 


* The 


Eollowing line sets the EDITION number to 2 




(230) VRSIOH 


FCB 


2 






(231) ERROR 


FCB 


$0A 






(232) 


FCC 


/cat: parameter error/ 




(234) 


FCB 


S0D 






(235) 


* 








(236) ACCESS 


FCB 


S0A 






(237) 


FCC 


/cat: car 


' t open / 




(240) 


* 








(250) BEGIN 


STX 


PRMPTR 


save your parameter position 




(251) 


CLRA 




set register A equal to 




(252) 


CLRB 




set register B equal to 




(253) 


STD 


COUNT 


store at COUNT 




(253.1) 


STD 


FROM 


clear FROM pointer 




(253 2) 


SUBD 


#1 


make D equal 65535 




(253.3) 


STD 


TO 


set TO pointer 




(253.4) 


BSR 


OPTCHK 


process options 




(254) 


STX 


PRMPTR 


store X at PRMPTR 




(255) 


CLR 


IPATH 


default input from stdin 




(256) 


LDA 


J>.x 


place character at X in A 




(257) 


CMPA 


#$0D 


is the character a <CR> 7 7 




(258) 


BEQ 


MAIN 


if so, skip to MAIN 




(260) 


LDA 


#READ. 


set access mode for reading 




(270) 


0S9 


I$OPEN 


attempt to open file 




(280) 


BCC 


CAT5 


file opened okayl 




(280.1) 


CMPB 


#216 


"FILE NOT FOUND" error 77 




(280.2) 


LBNE 


EXIT 


no, exit program (troubles) 1 




(280.3) 


LDX 


PRMPTR 


else, point to the filename 




(280.4) 


LEAY 


BUFFER, U 


and the buffer 




(280.5)CAT3 


LDA 


,X+ 


get a character from the name 




(280.6) 


STA 


,Y+ 


and place it in the buffer 




(280.7) 


CMPA 


#$0D 


end of the command line?? 




(280.8) 


BEQ 


CAT4 


yes , all done w/the name 




(280.9) 


CMPA 


#$20 


else, end of the filename?? 




(281) 


BNE 


CATS 


no, loop back till name done 1 




(281.1) 


LDA 


#S0D 


else, get a <CR> 




(281.2) 


STA 


P.v 


and place it at the end of the name 




(281.3)CAT4 


LEAX 


-1,X 


back up the parameter pointer 




(281.4) 


STX 


PRMPTR 


and store the new value 




(281.5) 


LEAX 


ACCESS, PCR point to the access error msg 




(281.6) 


LDY 


#17 


it is 17 characters long 




(281.7) 


LDA 


#2 


output to standard error path 




(281.8) 


0S9 


I$WRITLN 


and write the 1st part of msg 




(281.9) 


LEAX 


BUFFER, U 


now point to the copied name 




(282) 


LDY 


#BUFSIZ 


set length to maximum 




(282.1) 


OS9 


ISWRITLN 


and write out the filename, also 




(282.2) 


BRA 


CAT42 


go back for another file 




(282.3) 










(290) CAT5 


STA 


IPATH 


store input path # 




(300) 


STX 


PRMPTR 


store parameter position 




(305) 


* this 


is the main 


loop 




(310) MAIN 


LDA 


IPATH 


get input path # 




(320) 


LEAX 


BUFFER, U 


set 'X' point to the buffer 




(330) 


LDY 


#BUFSIZ 


set 'Y' to maximum # of bytes 




(340) 


OS9 


I$READLN 


attempt to read a line 




(350) 


BCS 


EOFCHK 


branch out if error or EOF 




(351) 


LDD 


COUNT 


get the current line count 




(352) 


ADDD 


#1 


add 1 to the line count 




(353) 


STD 


COUNT 


store the new line count 




(354) 


CMPD 


FROM 


compare COUNT to FROM 
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ecommended Reading for Your CoCo from . 




m 



The Rainbow Bookshelf 







The Complete Rainbow Guide To OS-9 

The book that demystifies the state-of-the-art operating system 
for the Tandy Color Computer. Authors Dale L, Puckett and Peter 
Dibble show you how to take advantage of OS-9's multi-tasking 
and multi-user features, and the capability of redirecting input 
and output commands at will. An easy-to-read, step-by-step guide 
packed with hints and tips, tutorials and free software in the form 
of program listings. 
Book $19.95, Disk $31.00 (2 disks, book not included) 

The Rainbow Book of Simulations 

Features 20 award-winning entries from THE RAINBOW'S first 
Simulation programming competition. You are the Commander- 
in-Chief of the Confederate Army during the Civil War, an air 
traffic controller at one of the nation's busiest airports, the owner 
of your own software business, a civil defense coordinator in 
charge of saving Rainbow City from a raging flood, a scientist 
conducting experiments on Mars . . Your wits are on the line. 
Book $9.95, Tape $9.95 



The Rainbow Book of Adventures 

A collector's item containing 14 winning programs from THE 
rainbow's very first Adventure contest. Includes such favorites 
as Sir Randall ol the Moors, Search lor the Ruby Chalice, Deed 
ol the York, Horror House, One Room, The Door and Dr. Avaloe. 
Plus, hints and tips on solving Adventures. 
Book $7.95, Tape $7.95 



The Second Rainbow Book of Adventures 

Our newest arrival features 24 of the most challenging Adventure 
games ever compiled. Meet the Beatles and battle the Blue 
Meanies, find a hidden fortune, or win the heart of a beautiful 
and mysterious princess. Experience the thrills and chills of the 
most rugged Adventurer without ever leaving your seat. Ring 
Quest, Secret Agent Man, Dark Castle, Curse ol Karos, Island 
and more! 
Book $13.95, Tape $13.95 



Coming soon 
The Rainbow Guide to Introductory Statistics 
The Second Rainbow Book of Simulations 



I want to start my own Rainbow Bookshelf! 

Please send me: 

□ The Rainbow Book of Simulations $ 9.95 

□ Rainbow Simulations Tape $ 9.95 

D The Complete Rainbow Guide to OS-9 

(book only) $1 9.95 

□ Rainbow Guide to OS-9 Disk Package (2 disks) $31 .00 

D The Rainbow Book of Adventures (first) $ 7.95 

□ Rainbow Adventures Tape (first) $ 7.95 



Name 




Address 

City 

State _ 



ZIP 



D The Second Rainbow Book of Adventures $13.95 . 
D Second Rainbow Adventures Tape $13.95. 

Add $1.50 per book Shipping and Handling in U.S. 

Outside U.S., add $4.00 per book 

Kentucky residents add 5% sales tax 

(Allow 4 weeks tor delivery) Total . 



□ Payment Enclosed, or D Charge to: 
D VISA □ MasterCard □ American Express 



Account Number 



Card Expiration Date 
Signature 



Mail to: Rainbow Bookshelf, The Falsoft Building, P.O. Box 385, Prospect, KY 40059. To order by phone, call: (502) 228-4492. 

Please note The tapes and. disks ottered by The Rainbow Bookslielt are not stand-alone products. That is, they are intended to be an 
adjunct and complement to the books. Even it you buy the tape or disk, you will still need the appropriate book. 
OS-9* is a registered trademark ot the Microware Systems Corporation. 



CALLTOLLFREE 
1-800-351-3442 

IN PA CALL 1-717-322-7700 



"Where Pfices ate Born. Not Raised.'' 

llU. WHITE HOUSE 
{^COMPUTER 

P.O. Box 4025. Williamsporl. PA 17701 



House Specials 
Amdek Color 300 w/video driver 1 99.95 

Flip-n-File 50 w/lwo free boxes of ss/disks 28.95 
2700 sheets of 20 lbs Lazor edge paper 24.95 



MONITORS 



TEKNIKA 
COMMODORE 



r PRINTERS 1 


Y STAR MICRONICt 


• 


SG10 


'■210.95 


SGIOC 


m oc 






snio 


321 95 


S0>5 


«i no 


SR10 


469 00 


SB15 


58? 00 


Powcrtype 


299.95 


QKIMAIf ,0 0KIDATA 


170 96 


3K.IMAK 20 


210 00 


18? 




199 


1 


193 




94 


• 


808,NL0 LEGEN ° 


149 95 


1080 


199 95 


13811 




136b 


295 UC 


HS80 EPS0N 


319 00 


IIXDO 


209 00 


RXIOO 


379 00 


JX80 




FX8S 


337 00 


FXIS5 


1 


LX80 


:'ii oo 


101500 iPAfl, 




lOISOOlSERi 


1)99 00 


,„„, PANASONIC 


;3i oo 


1097 


369 00 


1093 


125 DO 


■ ■ 


425 00 


CITIZEN 




MSPIO 


275 00 


'• 1 


119 00 


MSP20 




VS.','' 


54'1 OU 


INTERFACES ^ 


Y SM Serai 


„.. ^ 


r PAPER ^ 


nee 




neeisum 


'. 1! 


wo sneeis ii*/oi 


. ,■ 


. •■■■ 




ID 




COLOR PAPER 




ASSORTED PASTELS 


• ■ ..- 


: ' 






iW sheen 


' 


r MODEMS 


r 








1" ■ 




1 . ■ 




i 


■.. ,. 



180? 
1901 
1902 

SM1M 
SC1224 

AIM 12? 
ZVN 123 

1205 

1200 
1201 

300G 
300A 
310A 
Colot 300 

' 
Cold COO 
Colo' 700 
ColW 710 

13 Color 
20 Cob' 

' 
lilt 



S185 95 
CALL 
9 II 



ATARI 
ZENITH 

NEC 
AMDEK 



SYLVANIA 
. 
IV. «GB 
SAMSUNG 



SAKATA 



SI25.00 
79 95 
99 95 

" • •• 00 
127 00 
145 00 
175 95 
■ 
19 
II ■ 

S3?5 00 
CAI I 

S95 00 



DISKETTES 



BONUS 



MAXELL 



50 



:.' ■ 

NO LABEL i mm IKp-n-IIM I pom 



■ 
MEMOREX 

SS'OD 

ns/no 

129 

Al Orthotics Cairy A Lilstimo w.iruMy 



INNOVATIVE CONCEPTS 



■ 

■ ■ 



. Ml 
1 I 



" ' I 

1 



"Where Prices are Born. Nol Raised." 

WHITE HOUSE 
COMPUTER 




P.O. Bo. 4025. Wlltmmspoft, PA 17701 
VISA 



Nodroos, 

. : ' 
USA APO ,miJ FPO Ordm ,1 Sf. W on, n„,iJ 

,..,! f..P,„„,| ) M.II.WS10WI-?" M, 

-iii,jtp..i<j '« p * rvwuutit* PA 
HIM III -'■ 



4% 'MoilfConl] 



., PA r 



AMERICAN 
EXPRESS 5% 



(355) 

(356) 

(357) 

(36(3) 

(37?) 

(38?) 

(39?) 

(395) 

(4??) 

(41?) 

(42?) 

(43(3) 

(44(3) 

(45?) 

(451) 

(452) 

(46?) 

(47?) 

(48?) 

(481) 

(482) 

(483) 

(484) 

(485) 

(486) 

(487) 

(488) 

(49?) 

(5??) 

(5?5) 

(51?) 

(515) 

(52?) 

(525) 

(53?) 

(535) 

(54?) 

(545) 

(55?) 

(551) 

(555) 

(563) 

(565) 

(57?) 

(575) 

(58?) 

(585) 

(59?) 

(595) 

(6??) 

(6?5) 

(61?) 

(615) 

(62?) 

(625) 

(63?) 

(635) 

(64?) 

(645) 

(65?) 

(655) 

(66?) 

(665) 

(67?) 

(675) 

(6a?) 

(685) 

(69?) 

(695) 

(7??) 

(7?5) 

(71?) 

(715) 

(72?) 

(725) 

(726) 

(73?) 

(735) 

(74?) 

(745) 



EOFCHK 
EOF 

CAT42 



OUT 
EXIT 

OPTCHK 



MINUS 



PLUS 



OPTOUT 



PARERR 



UETNL'M 



BLO 

CMPD 

BHI 

LDA 

0S9 

BCC 

BRA 

* check 

CMPB 

BNE 

LDA 

OS9 

BCS 

LDX 

CLP, 

CLR 

LDA 

CMPA 

BEQ 

PSHS 

LEAX 

LDA 

LDY 

OS9 

PULS 

BRA 

CLRB 

0S9 

* 

LDA 

CMPA 

BEQ 

CMPA 

BEQ 

CMPA 

BEQ 

CMPA 

BNE 

* 

LDA 

CMPA 

BLO 

CMPA 

BHI 

BSR 

STD 

LDA 

CMPA 

BEQ 

CMPA 

BEQ 

CMPA 

BEQ 

BRA 

* 

BSR 

STD 

LDA 

CMPA 

BEQ 

CMPA 

BHI 

LDD 

STD 

BRA 

* 

LEAX 

RTS 

* 

LEAX 

LDY 

LDA 

OS9 

BRA 

* 

CLRA 

CLRB 

BSR 

BSR 



MAIN If less than, loop 

TO compare COUNT to TO 

EOF If high, end file 

#1 load 'A' with standard output 

I8WRITLN write to standard output 

MAIN if no error , loop back 

EXIT otherwise, end program 
for End Of File 

#ESEOF is it the EOF 7? 

EXIT if not, error has occurred 

IPATH get input path # 

IJCLOSE and close the path 

EXIT if an error, branch 

PRMPTR get position in parameters 

COUNT make line counter. . . 

COUNT+1 equal to zero, again. 

?,X check next character 

#$?D Is It a <CR> 77 

OUT yes, all done listingl 

X save parameter pointer 

ERROR, PCR point to a line feed character 



#STDOUT 

#1 

I$tfRITLN 

X 

BEGIN 



FSEXIT 

,X+ 

#'. 

OPTCHK 

#$2? 

OPTCHK 

#' + 

PLUS 

#'- 

OPTOUT 

?,X 

#'? 

OPTCHK 

#") 

PARERR 

GETNUM 

TO 

?.X 

#$2? 

OPTCHK 

#' . 

OPTCHK 

#S?D 

OPTCHK 

PARERR 

GETNUM 
FROM 

$>.x 

#■ - 

OPTCHK 

#' . 

PARERR 

FROM 

TO 

OPTCHK 



-1,X 



this is going to standard output path 
only one character to output 
print itl (separates files) 
restore parameter pointer 
go back 6c LIST another file 

clear 'B' and ' CC 
exit the command 

get next character 
check for a comma 
If it is, skip it 
check for a space 
if it is, skip it 
check for a "+" 
if it is, branch 
check for a "-" 
if not, end OPTCHK 

get next character 

test low number range 

if less , branch 

test high number range 

if too high, error 

convert the number 

store "line2" at TO 

get next character 

Is it a space? 

if so, branch back 

is it a comma ?? 

if so, branch back 

is it the end of line? 

If so, branch back 

else, a parameter error 

convert the number 
score "linel" at FROM 
get next character 
is it a "-"? 
if so , branch back 
is it a delimiter? 
if not, parameter error 
get "linel" 's value 
store as "line2" 
branch back 

set X back one char, 
return from routine 



ERROR, PCR get the error message 
#BUFSIZ set up a big enough buffer 
#2 standard error path 
ISWRITLN write error message 
OUT end LIST command 



ONCE 
TWICE 



sot A equal to jj 
set B equal to ? 
check for 1 digit 
check for 2 digits 
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(75?) 


TWICE 


BSR 


ONCE 


check for 1 digit 


(755) 


ONCE 


BRA 


DIGIT 


check for 1 digit 


(76?) 




* 






(765) 


DIGIT 


PSHS 


D 


save D on the stack 


(77(3) 




LDB 


P.x 


get next character 


(775) 




SUBB 


#'? 


subtract value of "?" 


(78?) 




BCS 


DIGOUT 


if less than "?" branch 


(785) 




CMPB 


#MULT-1 


is it a digit ?? 


(79?) 




BHI 


DIGOUT 


if not, branch 


(795) 




PSHS 


B 


save number 


(8??) 




LDB 


#1? 


ready to multiply by 1? 


(8?5) 




MUL 




multiply previous MSB 


(81?) 




STB 


1,S 


save result 


(815) 




LDA 


2,S 


get previous LSB 


(820) 




LDB 


#1? 


get ready to multiply 


(825) 




MUL 




multiply by 1(J 


(83?) 




ADDB 


.s+ 


add current digit 


(835) 




ADCA 


M 


add result of 1st mult. 


(84?) 




LEAX 


1,X 


increase X 


(845) 




STD 


P.s 


store new number 


(85?) 


DIGOUT 


PULS 


D,PC 


return 


(855) 




* 






(86?) 




EMOD 




set module's CRC 


(87?) 


THEEND 


EQU 


* 


end of program 


(88?) 




END 




tell ASM that you're through! 


Listing .;. 














* 


* 
* 
* 




ERROR 


UTILITY COMMAND - OS -9 

•la 




Copyright 1984 Brian A. Lantz * 


* 






Ml rights reserved * 


* 




from the 


UNICHARGER 


utility package * 


* 




distributed by Frank Hogg Labs 


* 








* 


* S 


yncax: e 


rror <err 


nuai> 


* 



Lists the corresponding error message from the error file * 
(/d?/sys/errmsg) for the specified error number (errnura) . * 
All leading zeros of errnum are ignored. * 



NAM ERROR 

TTL OS-9 Utility Command (c)1984 Brian A. Lantz 

IFP1 

USE /D1/DEFS/0S9DEFS 

ENDC 

TTL OS-9 Utility Command (c)1984 Brian A. Lantz 



STDOUT 
STDERR 



TYPE 
REVS 



ERRNAM 



EQU 1 
EQU 2 



STANDARD OUTPUT PATH NUMBER 
STANDARD ERROR PATH NUMBER 



SET PRGRM+OBJCT 

SET REENT+1 

MOD ERREND. ERRNAM. TYPE, REVS, ERRENT , ERRHEM 

FCS "Error" 



DATA AREA DEFINITIONS 



A-'ft -A -A - A- 
* 

* * 

**<oV A -A-A-A-*-A- * -*-*-A-A-*-*-A-A-*- A A A A A ' A A A A A A A A A A A ' A A A A A -A-A-A-A-A-A- A -A- A - A - A - A - AA - A - A - A - VA - A -A-A'A-A 





H-A-A'A'A-A 


*-)OVA-WA'*- 


BUFSIZ 


EQU 


2?? 




ORG 


9 


IPATH 


RMB 


l 


PRMPTR 


RMB 


2 


BUFFER 


RMB 


BUFSIZ 




RMB 


4?J3 



ERRMEM 



EQU 



SIZE OF INPUT BUFFER 

INPUT PATH NUMBER 
POINTER TO PARAMETER LINE 
ALLOCATE AN INPUT BUFFER 
LEAVE PLENTY OF STACK SPACE 

THIS MARKS THE END OF THE DATA AREA 



1ctrtc/t1ck**irirtrlt k A-A-A A-A-A-A-A - A AAAAAAAA A AAAA-AAAAAAAAAAAA AAA AAA A A A A AAAAAAAA 

* SOFTWARE VERSION NUMBER * 

* * 



* LOCAL * IN * LOS * ANGELES * 




Happy New Year! 

—Tandy DRO System— 
#26-3129 — $159.95 + S & H 

Quadrature Fan Module B 

Piezo Electric — .11 Watts 

Fits IN Coco — No Surge 

5 CFM — Low Noise — UL 

$26.95 + 2.50S&H 

6809 CPU Chip — $ 17.95 

RSDOS 1.1 Disk — $ 22.95 

Extended Basic 1.1 — $ 24.95 

Gold Rom "Y" Cable — $ 22.95 
We Stock Amdek Amdisks! 

VIP Integrated Library @ - 10% 

DynaCalc (RSDOS) @ - 10% 

Data Pack II (The Best Term.) @ - 10% 

Business Software @ - 10% 

E.D.C. carries the most 

complete line of software 

and hardware in the market. 




•232 RemotePlus* b, 1.....1 <v„„ 

y Requiret RS232 Pak or PBJ 2SP 
** Remote Terminal Program $& 



flail* 



t«** 



>«" 



W^' 



/f^fc 



Parallel to Keyboard 
.' No LoU or Garbled Data 
** Error Trapping y Software Clock 
y" Disable Break Key *» lnkey$ Support 
*• Neic Terminal Program 
** Conversation Mode 

y All Ext. & Duk Command* RAINBOW 
*** 20 Commands Added 
* Perfect for BBS 
*- 4 Versions Inch Ext., 1.0,1.1 & JDOS 
** Much More • Uses 4K 
$24.95 + 2.50 SAHa.. „, 

Hayes 300 Modem — $175.00 

Amdek & 1 + Cntrl. — $269.95 

SALE ON QUALITY MONITORS 



CEflTlFlCA 
SEA( 




COLOR & MICRO COMPUTERS 

Software • Hardware • Support 

Educational • Small Business • Games 

VOICE (213) 254-6809 10 A.M.-10 P.M. 

BBS (213) 258-0640 24 HKS. 

300 and 1200 Baud 

Extended Hours+Call before coming. 

6130 YORK BOULEVARD 

POST OFFICE BOX 42718 

LOS ANGELES, CA. 90042 

MAKE CHECKS PAYABLE TO E.D.C. 
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TIME BANDIT 

Bill Dunlevy & Harry Lalnear 
Tired of the same old screens 9 In TIM E 
BANDIT, you pick from more lhan 
TWENTY places wilh over 15 levels in 
each place. That's over 300 screens 1 
Visit FANTASY WORLD. WESTERN 
WORLD, & SPACE WORLD. Eight the 
Evil Guardians: Killer Smurphs, the 
Looking Lurker. Angry Elmo and more 1 
Find the Keys and collect the treasures 
ot time! Crisp Supergraphics, colorful 
SCROLLING landscapes, lull animation, 
and over THREE HUNDREDSCREENS 1 
The conquest ot time and space awaits 
you! 
32KTape S27.95/Disk S29.95 

CASHMAN 

Bill Dunlevy & Doug Frayer 
Explosive color, last-moving animation 
and amazing sound make this non- 
violent game a classic! Difterenl levels 
and more than FORTY screens oiler as 
much challenge & good clean fun as you 
can take! Play solo or enjoy the challenge 
of two-player simultaneous competition 
Scramble to get the loot first, but be 
caretul: the KATS are prowling and your 
opponent is tossing eggs! 
32K Tape S27.95/Disk $29.95 




SUPER PAINT 

by John Crane 
Super Paint is an exciting new en- 
hancement for your Graphicom draw- 
ing system. Break Ihe chains restrict- 
ing your creative freedom! Now you can 
draw and paint with every color your 
machine is capable of. Over 250 colors 
are available at all times! It's no longer 
impossible to find just the right shade or 
texture. Super Paint brings the COLOR 
back into your Color computer! Requires 
Graphicom system. 
32KDisk $19.95 

576 South Telegraph 

Pontiac. Michigan 48053 

(313)334-6576 



1 



* This is not necessary, but is needed if you wish to keep * 

* track of your version number using the EDITION number of tha * 

* IDENT utility. The EDITION number is the first byte after the * 

* module name in the program section of code. * 



VRSION 



FCB 1 



VERSION NUMBER 1 



■A^cA^WW<-*-A^t-A-***lV-A-A-A**-A-A-A-^^ 

* The following are the two error messages that can be reported * 

* by ERROR. The label "ERFILE" is also used as the filename for * 

* the error file. If you are using a device other than "/DJJ" , * 

* this line should be changed. For example, "/HJI/SYS/ERRMSG" for* 

* a hard disk. * 

**^V*rt*******Vh*******TMr*-^^ 

ERROR FCB $JJA 

FCC /error: cannot open / 
ERFILE FCC "/D0/SYS/ERRMSG" 
FCB $0D 

NONUM FCB SPA 

FCC /error: no error number given/ 
FCB $J3D 



friWo^V^Afrfrft-A-A-a-A-A-A-ft-A-A-A-A-V^ 

* ENTRY POSITION OF THE "ERROR" UTILITY COMMAND * 

* * 

* Entry registers used: * 

* X -> parameters from command line * 

r/eirir/r/riric 



ERR2NT 



STX PRMPTR 
LDA JJ,X 
CMPA #Sf3D 
BNE YESNUM 



Store the pointer to the command line 

Get the first character 

Is it a blank command line?? 

No, there was a number given! 



* This routine handles the situation of no error number given 

^■A"frA-iVVi-A-*-A-A-A-A-A-A-A-/rA-A^-A-A-A-A^/rft-yf'A-A'/rrt^'Ar/ryf^ArA 



Point to "no error number given" msg 
Maximum of 8$J characters to be printed 
Output to the error path 
Print the message 
And leave ! 



■tcir/f/cA AA A AAAAA A -AAAAAAAA AA AAAA AA A AA ' AAA AAA A-A-A-A-A-A-A-A-A-A-A-A-A-A-A-A-A-A-A-A- A - A - A-A -A- A - 

* Skip leading zeros * 

*-A-A-A-A- * -)VA A'AA A A A-A-A-A A'A'A'A-A Me* A A -A A A A A A A-Arft-A-A'A AAAAAAAAAAA.AA A-A-A-A-A-A-A-A-A-A-A-dcA 



ERRNM 


LEAX <NONUM,PCR 


ERR 


LDY #8)3 




LDA #STDERR 




OS9 ISURITLN 




LBRA OUT 



YESNUM 



NOZERO 



* 



CMPA #')? 
BNE NOZERO 
LEAX 1,X 
LDA JJ.X 
BRA YESNUM 



STX PRMPTR 
CMPA #$0D 
BEQ ERR35 



Is the next character a zero ?? 
No, continue with the number! 
Else, move past the zero... 
Get the next character. . . . 
And loop back 



Save current place in parameter line 
End of command line ?? 
Yes , "Unknown error" ! ! 



^TWnWo"rA-»V^V-A-A-»VTWf>V^WrA^nWc-/rA-A-)V-,^WoWrA 

Open up the error file * 

rA-A-A-i'f-A-A-A-A-»WnWrtrto 



ERR20 



LEAX <ERFILE,PCR 
LDA #READ . 
OS9 ISOPEN 
BCS ERR4J2 
STA IPATH 

LDA IPATH 

LEAX BUFFER, U 



Point to the filename 
Open it for read access 
Do it! 

If error, can't open file! 
Else, store path number 

Get path number 

Point to the buffer area 



224 



THE RAINBOW 



March 1986 



LDY #BUFSIZ Read in a maximum of "BUFSIZ" bytes 

0S9 ISREADLN From the file 

BCS ERR3JJ If error, branch I 

PSHS X,Y Else, save these registers 

LDY PRMPTR Point 'Y' at the parameter 



*»»****** *** ** * *** ** ***** * ****** ^ 

* Compare the ASCII Decimal parameter to this error number * 

AAAAA-A " A'A - AA-A- A A-A-A-A " A-A-V,*-A-A-*-A^A-A-»^ 



LP1 



LP2 



MSG 



LDA ,Y+ 
CMPA ,X+ 
BNE LP2 
LDA 0,Y 
CMPA #$(JD 
BNE LP1 
LDA 0,X 
CMPA #S2JJ 
BEQ GOTIT 
BRA LP1 

PULS X,Y 
BRA ERR20 



FCB $0A 

FCC /ERROR #/ 



Get this byte from parameter 

Same as from file 11 

No, try again I 

Get next byte from parameter 

All done with parameter number?? 

No, continue to loop I 

Else, check next file line byte 

Is this number done?? 

Yes , we found it 1 I 

Else, loop back (to fail) 

Restore these registers 

And try again, with the next line! 



A- A- A- * * * * ** * **** A A A A A A A A A A A' A- A A-A A- A A A-A A A A A *** A A A A A ******** k A A A A ****** 

* SUCCESS I I We found it I * 

* A - A A kk k -kkkk******************* AAA ******************************** 



GOTIT 



LEAX 


<MSG,PCR 


LDA 


#STDOUT 


LDY 


#8 


0S9 


ISWRITLN 


BCS 


ERR5JJ 


PULS 


X.Y 


0S9 


I$«RITLN 


BCS 


ERR5JJ 


BRA 


OUT 



Point to "Error #" msg 

Output to standard output path 

8 characters 

(Write 'eml) 

If error, leave (got real troubles) I 

Restore these registers 

And write the line from the file 

If error, leave I 

Else, exit without error 



WHAT FCB $?A 

FCC /error: unknown error??/ 
FCB $0D 



******k****ir****irk*^rk******irk*ir*irk*********M^ 

* File input has returned an error I End of file ?? * 

********************irk*******ir*kkkky\A**kl^-k-*k-k-* 



ERR3JJ 



CMPB #ESE0F 
BNE ERR5J3 



End of file?? 

No, troubles 1 (else, "unknown error") 



rk*************k******i'rfrk 

* "I don't think that I quite understand you! I" * 

A A A -A A - A -A AAAAA AAAAA A - A-AA A A A - A A A -A-A-A-A-A A-A A A A A AA A A A A A A A A A A A A A A A A A A A A A A A A-A 

ERR35 LEAX <WHAT,PCR Point to the "unknown error" msg 
LBRA ERR And print it! 



■A-A-A-* A-A-A-* A A A' A -A- A -A- A - A A -A-A-A A A **** ******* *** *** ******** A A A A A A AA A-**A k kkkk 

* "I can't seem to find that file. Is this the correct disk??" * 

A AAA A ** ***** ** *** A-A A A - A - A - A - A - A - A -A-A-A-A-A-A-A-A-A-ATWr * A A A A A kkk irk*********ir***** 



Point to the "can't find error file" msg 
And print it I 

Return with no error 

End this process; return to parent process I 



ERR4P 


LEAX ERROR, PCR 




LBRA ERR 


OUT 


CLRB 


ERR50 


0S9 F$EXIT 




EMOD 


ERREND 


EQU * 




END 



/7?\ 



The Universal 
Maclnker(s) 
are here 

Re-ink any Fabric 

ribbon automatically 

for less than 

5<P 



Now one Universal Cartridge 
Maclnker (UC) re-inks aU fabric car- 
tridges and one Universal Spool 
Maclnker (US) re-inks all spools. We 
have Maclnker(s) dedicated to 
specialized cartridges, zip pack, har- 
monica etc. Over 1000 printer brands 
supported. Use your Maclnker to re- 
ink your dry, fabric cartridges (for 
less than 5 cents in ink) and watch the 
improvement in print-out quality. Our 
new, residue-less, lubricated, dot 
matrix ink yields a darker print than 
most new ribbons. Or get any of our 
basic ink colors: brown, blue, red, 
green, yellow, purple and use 
Maclnker to create and/or Re-ink 
your own colored cartridges. We 
have uninked or colored cartridges 
for the popular printers and ribbon 
re-loads for any printer. Operation is 
extremely simple & automatic with 
new, twin drive electric motor that 
supports CW and COW rotating car- 
tridges. A good quality fabric ribbon 
of average length can be re-inked 
almost indefinitely. In our tests one re- 
inked Epson* 80 ribbon has outlived 
the estimated life of the print-head!! 
We receive consistent & similar feed- 
back from our customers. As of 
August 85 we have over 40,000 MAC 
INKER(s) in the field, in 5 continents 
(220 V motors available). Maclnker 
(UC) is $60.00. Cartridge drivers are 
S8.50/ea. We still have our first 
generation, dedicated Maclnker(s) 
for most popular printers. Prices start 
at $54.95 with most units below $60.00. 
Maclnker has been reviewed, ap- 
proved and flattered in most 
magazines and even in the NEW 
YORK TIMES and the CHICAGO SUN 
TIMES. 




UnlVBttol Cartridge M. 



Cfismpufer 
Friends 

6415 S.W. Canyon Ct. 

Portland, OR 97221 

(503) 297-2321 

Order toll free 1-800-547-3303 

or ask for free detailed brochure. 
Dealers inquiries welcome. 

•EPSON is a trademark of EPSON CORP 
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ACCESSIBLE APPLICATIONS 



Firing Up 

BASIC09 



By Richard A. White 
Rainbow Contributing Editor 



Last month we prepared a disk 
with selected portions of OS-9, 
BAS1C09 and RUNB. The intent 
was to be able to back up this disk to 
provide working disks for each major 
programming effort, and one or two 
disks that can be a collection of small 
projects. Now I will assume you have 
done this and, disk in hand, are ready 
to gel on with it. And cheers to you who 
got on with it on your own. Put the disk 
in Drive and boot up. 

For reasons that will be apparant 
later. 1 suggest you enter both the date 
and the time at the prompts — did you 
put SET1ME in your start-up file? Next 
you will see the BASIC09 copyright 
notice, BASIC09 on the left margin and 
READY below it. You are in BASlC09's 
System Mode. There are three modes. 
System, Edit and Debug. Commands 
available from System let you attend to 
housekeeping chores like loading, sav- 



Richard White lives in Fairfield, Ohio, 
and has a long background with micro- 
computers and specializes in BASIC 
programming. With Don Dollherg. he 
is the co-author of the TIMS database 
management program. 



ing and other file handling activities as 
well as issue commands to OS-9. 

Commands can be sent to OS-9 by 
typing the dollar sign (S) and following 
it with your Shell command. For exam- 
ple, SMFREE will report the amount of 
free memory. By prefacing your Shell 
commands with the dollar sign you can 
do anything you might normally do 
from OS-9 provided there is enough 
memory available. The rub is that there 
isn't much free memory when BASIC09 
is resident. 

You have some control of memory 
usage from the System Mode. Enter 
MEM at the prompt and BASiciw re- 
ports the amount of memory available 
in its buffer. This is the original buffer 
size you requested, less the amount 
taken by any resident procedures. Now, 
say you want to list a file but there is 
not enough free memory to load and 
execute LIST. You typed SLIST MY- 
FILE, the disk drive ran, the Error #207 
message appeared, and the BASIC09 and 
READY prompts reappeared. If you set 
your BASIC09 buffer size at 14K. in your 
start-up file, you can now reduce the 
buffer from BASlC09's System Mode by 
typing MEM 12000. This reduces your 
buffer size approximately 2,000 bytes, 
which should give LIST some elbow 



room. MEM 14000 will return those 2K 
bytes if you need them later. 

Limited memory forces us to keep 
our program procedure modules small. 
This is good since it forces the creation 
of more maintainable programs. Only a 
piece of a program is active at any one 
time. BAS1C09 lets us develop these 
pieces separately and keep them on the 
disk separately. They are loaded as 
needed and can be removed from mem- 
ory when not needed to make room for 
others. This is even better than PASCAL 
where all procedures generally are kept 
in the program before the code that calls 
them. This also makes it easier to load 
and edit some module from another 
program that does nearly what we want 
rather than starting from scratch. 

To reinforce the memory lesson, if 
you don't specify buffer memory when 
calling BASIC09, only a 4K buffer is 
allocated. Both your program and its 
data must fit into the buffer. But, you 
can request added memory when you 
first call BAS1C09, or you can use MEM 
to enlarge the buffer from System Mods 
Of BASIC09. 

From System Mode, the D1R com- 
mand displays the name, size and var- 
iable storage requirements of each 
procedure in the buffer or work space 
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More Incredible! 



Now there are THREE! 



TERMINAL NOT INCLUDED 



The QT 

The QT family of multi-user, multi-tasking 
computers supports from 4 to 20 users. 
Currently 9 models are available, ranging in price 
from $ 1,595 to $ 8,795. Models are available 
with the Motorola 68008, 68000 or the new 32 
bit 68020 CPU. CPU speeds range from 8 Mhz 
to 16.67 Mhz; RAM size from 128K to 2048K 
and ROM from 2K to 256K. All the QTs have 
a built in SASI interface and will support any 
hard drive. All QTs include OS9/68K, the 
multi-user operating system with Basic, utilities, 
word processing and spreadsheet programs. The 
QTs take up less than one cubic foot of space. 

The QT series: 

The basic QT has 128K RAM, 68008 CPU, 8 
Mhz and will support 4 users and 2 printer ports. 
The single floppy version is priced at $ 1,595 
(Retail $ 2,095) and is field upgradeable to 512K 
RAM and 20 Meg hard drive. This system sells 
for $ 2,995 (Retail $ 3,595). 

The QT Plus series: 

This QT has 512K RAM, 68000 CPU, 10 Mhz 
and supports 4 users and 2 printer ports. The 
single floppy version is priced at $ 2,095 (Retail 
$ 2,695) and is field upgradeable to 1024K, 8 
serial ports and hard disk. The QT Plus 4 user 
system with 5 1 2K RAM and 20 Meg hard drive 
is priced at $ 3,495 (Retail $ 3,995). The 512K 
upgrade costs $ 395 (Retail $ 495). 



QT 20 68020 
QTPIus 68000 
68008 



mil 




The QT 20 series: 



This QT has 2048K RAM, 68020 CPU, 12.5 
Mhz and supports 4 users and 1 printer port. 
This system can be expanded to 20 users with 
16.67 Mhz. The QT 20 with a 20 Meg hard 
drive sells for $ 7,495 (Retail $ 8,795). 

QT Price List 1986 



CONFIG. 

QT 1 Drive 
QT 2 Drives 
QT 20 Meg HD 



DIRECT RETAIL 



$1,595 
$1,750 
$2,995 



QT+ 1 Drive $2,095 

QT+ 2 Drives $2,250 

QT+ 20MegHD $3,495 

QT20 20MegHD $7,495 



$2,095 
$2,295 
$3,595 

$2,695 
$2,895 
$3,995 

$8,795 



OS9/68000 SOFTWARE 
Available Now 

Sculptor $995 ($695 for QT owners) 

Microware C $400 

Microware Pascal $400 Add 3.50 Shipping 
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OS9 is a trademark of Microware Inc. 



770 James St., Syracuse, NY 13203 Telex 646740 

315/474-7856 



What the manual does not say is that 
pressing the ENTER key alone does the 
same thing. Since we have not yet 
started writing a procedure, the work 
space should be empty and DIR or 
ENTER should return the following on 
the screen. 

Basicf»9 

Ready 

B: 



Proc-Size Data-Size 



Name 

13(355 free 

Ready 
B: 



1 had asked for I4K of buffer so you 
can see that BAS1C09 grabs nearly 1 K. for 
its own operations. I have been working 
on a notepad program. The main mod- 
ule is called "notes." This module and 
others in the program run two utility 
modules called "printat" and "isupper," 
which are loaded with "notes." Now 
when I press ENTER, I get this display. 



Ready 
B: 



Name 
noees 
printat 
*isupper 

11537 free 

Ready 
B: 



Proc-Size Data-Size 



1134 

82 

317 



5)338 

22 

54 



The free memory has been reduced by 
the amount of memory used for the 
procedures. The data sizes are reported, 
but data space has not been allocated at 
this point. However, there is obviously 
plenty of space left for the data. The 
asterisk points to the last active proce- 
dure. In this case, "isupper" was the last 
procedure loaded, so it was active last. 
If I request only a 4K byte buffer, there 
will be space for the procedures, but not 
for the data and BASIC09 will display the 
following. 

MEM 40J3JJ 
Readv 



Proc-Size Data-Size 



1134 

82 

317 



5(338? 

22 

54 



Name 
notes 
printat 
*isupper 

1297 free 

Ready 
B: 



BAS1C09 knows that there is not 
enough memory to run "notes" and 
flags the fact with a question mark 
following the data size. 

With BASIC09, you will get to know 
and love the friendly asterisk. Think of 
it as meaning all or all the way, depend- 
ing on the context in which it is used. 
It is particularly useful when saving, 
killing and packing programs with a 
number of modules in the work space. 
If I type SAVE NOTES the procedure 
"notes" will be saved to a file on disk 



named "notes." If I type SAVE* NOTES, 
the procedures "notes," "printat" and 
"isupper" will all be saved to one file on 
disk named "notes." The next time I 
load notes, all three procedures will be 
loaded. 

Procedures are written and edited in 
the Edit Mode. Type EDIT, or E, and the 



"To reinforce the 
memory lesson, if you 
don't specify buffer 
memory when calling 
BASIC09, only a 4K 
buffer is allocated." 



procedure name and you will be in Edit. 
Lowercase works as well, and 1 usually 
stay in lowercase. 

Color BASIC gives you the capability 
to start printing anywhere on the screen 
with PRINTS. BAS1C09 lacks PRINTS, but 
has a way to position the cursor at a 
particular column and row. It's a tad 
awkward, so I put the code to do this 
in a short utility named "printat." For 
tutorial purposes it is an excellent first 
program, for it is both simple and will 
be continually usable as you program in 



SERIAL TO PARALLEL 
PRINTER INTERFACE 



SP-2 INTERFACE for EPSON PRINTERS: 

■ 300-19,200 BAUD rates 

■ Fits inside printer — No AC Plugs 

■ Optional external switch ( s 5°° extra) frees 
parallel port for use with other computers 

■ $ 49 9S (plus '3°° shipping) 

SP-3 INTERFACE for MOST OTHER PRINTERS: 

■ 300-19.200 BAUD rates 

■ External to printer — No AC Plugs 

■ Built in modem/printer switch — no need for 
Y-cables or plugging/unplugging cables 

■ $ 64" (plus s 3°° shipping) 



Both also available for IBM, RS-232 and Apple IIC computers. 



DISK DRIVE SYSTEMS 

ALL i/a HEIGHT DOUBLE SIDED 

Drive (addressed as 2 drives!) s 235 

Drive 0. 1 (addressed as 4 drives!) 5 350 

All above complete with HDS controller, cable, & drive 
in case with power supply 

Bare Double Sided Drives s 109 

Dual '/i Height Case w/ Power Supply J 49 

Double Sided Adapter *25 

HDS Controller. RS ROM & Instructions $ l 19 

25 CDC DS/DD Diskettes s 32 & $ 3 s/h 

We use the HDS controller exclusively. Can use 2 different DOS ROM's, 

Shipping Costs: s 5/drive or power supply. S I0 max. 

Co Co Serial Cables 15 ft.— M0. Co Co/RS-232 Cables 15 ft— *20. 

Other cables on request. (Add W shipping) 

f> P.O. Box 293 

**- Raritan, NJ 08869 

(201)722-1055 

U\ ENGINEERING DEALER INQUIRIES INVITED! 
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THE SCULPTOR SYSTEM 

Sculptor combines a powerful fourth generation 
langauge with an efficient database management 
system. Programmers currently using traditional 
languages such as Basic and Cobol will be amazed at 
what Sculptor does to their productivity. With 
Sculptor you'll find that what used to take a week can 
be achieved in just a few hours. 

SCULPTOR INDEPENDENCE 

Sculptor is available on many different machines and 
for most operating systems, including OS9 6809 Level 
II and OS9/68000, MS DOS, Unix/Xenix and VMS. 
The extensive list of supported hardware ranges from 
small personal computers, through multi-user micros 
like the QT, up to large minis and mainframes. 
Sculptor is constantly being ported to new systems. 

APPLICATION PORTABILITY 

Mobility of software between different environments 
is one of Sculptor's major advantages. You can 
develop applications on a stand-alone PC or the new 
Level II CoCo and - without any alterations to the 
programs - run them on a large multi-user system like 
the QT. For software writers this means that their 
products can reach a wider marketplace than ever 
before. 

FHL CHOOSES SCULPTOR 

We choose Sculptor for the development of 'Mint', 
our Dental Office Management system because we did 
not want to restrict our market for it and because 
Sculptor is fast and easy to use. We started 
development in 1983 and since then Sculptor has gone 



thru constant improvement and is now running on a 
very wide array of computers. We are very pleased 
with Sculptor and intend to stay with it from now on. 

I LIKED IT SO MUCH I BOUGHT 
THE COMPANY! 

That's what the ad says for the popular razor. I did 
like it that much but they wouldn't sell, so we did the 
next best thing. We became the distributor for Sculptor 
in the US. Because we use it each and every day we 
were the natural choice. Everyone who has bought 
Sculptor from us likes it, and even more important 
they all use it. How many languages do you have on 
the shelf that you no longer use? Sculptor is the ONLY 
language I use for applications, make it yours today. 

THE BOTTOM LINE 

OS9 Level II 6809 and OS9/68000 $995.00 * 
MS-DOS (PC-DOS and compatibles) $595.00 

Call for prices on larger minis and mainframes. 
* QT versions of Sculptor are only $695.00 

NOTE: New Level II CoCo Owners: At this writing 
the new CoCo does not exist, however we are of the 
opinion that Sculptor will run on this new machine. 
Call us after it does exist for confirmation of Sculptor 
operation. 
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BASIC09. It is called with this line in a 
BASIC09 procedure. 

RUN printat(col,roui) 

To write "printat," we enter the Edit 
Mode and proceed to type it in. Here 
is what your screen will show. The E: is 
the Edit Mode prompt. 



Ready 

B:e printat 

PROCEDURE printat 

* 

E: 



Edit Mode is a line-oriented text 
editor. Compared to a screen-oriented 
editor like TSEDIT, Telewriter or 
DynaSiar, line editors leave much to be 
desired. Still, BASlC09's editor has cer- 
tain advantages that make it the pref- 
erable editor for entering BASIC09 pro- 
grams. First, it checks the syntax of 
each line as it's entered. Next, when you 
leave the Edit Mode, a check is made 
for other types of programming errors, 
for example, incomplete control struc- 
tures such as FDR without a NEXT. 
Finally, it is able to deal with line 
numbers or do without them. There are 
19 editor commands. I will discuss only 
a few. 

A line of text is preceded by a space. 
This is perhaps the hardest thing to 
remember since it is different from most 
other word processors you may be more 
familiar with. The editor tries to inter- 
pret a non-space character immediately 
after the E: prompt as a command 
character. An asterisk immediately 
following a command character means 
all or go all the way. If the plus sign (+) 



means move forward one line, +10 
means move forward 10 lines and +* 
means go to the end of the program. An 
ENTER alone moves you forward one 
line. The minus sign (-) moves you 
backward in the program, - 1 means go 
back 10 lines and -* means go back to 
the beginning. 

There are commands: to change, c; 
delete, d; list, 1; renumber, r; and s 
(search for a string). These apply to the 
current line or the next occurrence of a 
string in a change or search command, 
except when followed by the asterisk 



quiting is not always graceful. Here is 
where errors that are non-syntax in 
origin are reported, sometimes at great 
length. Don't worry if some get lost off 
the screen. From System Mode you can 
list your procedure to the printer and all 
the errors are printed at the end of the 
listing. Just another service from 
friendly BAS1C09. 

The operation of all these commands 
is well-covered in the BAS1C09 manual. 
Read it and practice. 

Following is the entire "printat" 
procedure. 



PROCEDURE printat 
0000 PARAM col, row: INTEGER 

000B PRINT CHR$(2); CHR$(col+32) ; CHR$(row+32) ; 
0021 END 



meaning all. Of these commands, only 
LIST can be followed by a number 
meaning the number of lines forward to 
be listed. 

The change command is a single-line, 
text substitution editor. You follow the 
'c' with a delimiter character such as a 
slash, comma or period. You choose the 
delimiter so it is different from any 
character in the original text string or 
the substituting text string. Next comes 
the original text string, another delim- 
iter character (it must be the same 
character as the first delimiter) and the 
text string to be substituted. A final 
delimiter is optional. You cannot 
change a line number with the 'c' com- 
mand. That is what 'r' is for. 

The most important command is 'q', 
which allows you to quit editing and 
return to System Mode. But be warned: 



The numbers in the left column are 
the number of bytes from the start of the 
procedure file to the start of each line 
in Hex. If you enter your program in 
lowercase, BASIC09 will change all 
BASIC09 keywords to capitals and leave 
variables and procedure names in low- 
ercase. BASIC09 does some other text 
formatting to improve readability, 
including automatic indenting and 
removal of unnecessary spaces and 
parentheses. 

A PARAM statement is a special type 
of dimension statement that defines 
variables to which values will be passed 
by the calling procedure. In this case, 
integers for the column and row posi- 
tion of the cursor will be sent. The 
ability to pass various types of data to 
and from a procedure makes modular 
programming possible. 



TRS-80 COLOR COMPUTER USERS NEWSPAPER 
SELL OR TRADE YOUR UNWANTED PROGRAMS OR HARDWARE IN THIS MONTHLY NEWSPAPER. FIND GREAT BUYS. 
CIRCULATION - OVER 18,000 COCO OWNERS. LIST YOUR CLUB OR BBS. FULL OF TIPS, ARTICLES, REVIEWS 
AND PROGRAMS FOR YOUR COCO. DON'T DELA*, SUBSCRIPTION STARTS AT ONLY $5.00 PER 12 ISSUES(1 YEAR) 
CLASSIFIED AD'S ONLY $.15 A WORD, USE SEPERATE SHEET DF PAPER FOR CLASSIFIED AD'S 

YES - I WOULD LIKE A SUBSCRIPTION TO COCO ADS 

1 YEAR THIRD CLASS MAIL $5.00 

" 1 YEAR FIRST CLASS & CANADA $10.00 



i 















NAME 



ADDRESS 



ZIP 



■M u ,"T-.»." 



■ f »!< H.mi — y 



CITY STATE 

PLEASE HAVE CHECKS PAYABLE TO - P SOFTWARE 
P BOX 13124 HOUSTON, TEXAS 77219 



tffW 
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DynaStar 



DynaStar is our most popular word processor for OS9. 
DynaStar works wilh O-Pak and WordPak 1 and II. DynaStar 
will also work wilh Level II OS9, which means that an 
upgrade will be available for the new CoCo that runs Level 
II OS9. DynaForm, the text formatting part of DynaStar 
has Mail-Merge, an extra cost option on other word 
processors. 
A terrific buy at ONLY $49.95 each. 

Add S3.50 shipping 



O-Pak 



The first OS9 product and still our most popular! 

NEW!!! COMPLETE SOURCE for O-Pak now 
available!!! (In C and assembler) 

For those of you who always wanted to know how we did it, 
here is your chance. The complete source for O-Pak is now 
available for only S70.00. Of course, you have to show 
that you own a copy of O-Pak to get it, or buy both O-Pak 
and Source for ONLY $100.00. 
As always O-Pak is ONLY $34.95. 

Add $3.50 shipping 



Word-Pak II and UVD 

If you are not using a Word-Pak II, you must be going 
blind by now. Word-Pak II gives you a true 80 column 
display like the 'big boys' have. The price includes the 
Basic software but the OS9 software is 17.95 extra. Get 
your Word-Pak II today ONLY $134.95. 
To use the full potential of the Word-Pak II you will need a 
video driver. UVD is the best we have seen because it 
works with all versions of the CoCo and requires NO 
soldering! ONLY $29.95 

Add $3.50 shipping 



Disk Drives for your CoCo 

You can buy cheaper drives for your CoCo but you can't buy 
better! Even Tandy sells cheaper drives than we do. We 
don't want to lower our standards so we still sell the best 
drive for your money. We only sell double sided drives in 
the best case we could find with a power supply that won't 
quit. We use the best controller on the market (The new 
J&M) the best drives (Teac) and our case. 

All drives are 1/2 height, double sided and our cases will 
hold two drives. 

Drive DS 40 $339.00 add $120 for drive 1. 
Drive DS 80 $349.00 add $130 for drive 1. 

SPECIAL Now our drive systems include BOTH RS DOS 
ANDJDOS!!! 

RS Disk Basic ROM 1.1 $20.00 Call for bare drive and 
custom cable prices. 

Add S5.00 shipping 



Cross Assemblers 

Create 68000 code on your CoCo!! 

At these prices it would be worth it just for the 68000 
alone, but wc also give you the ability to work with the 
1802/5, 6800/01/11/03, 6804, 6805, 6809, 6502/3, 
8080/5 8048, 8051, Z80, and the 68000!!! Not only that, 
we give you the COMPLETE SOURCE too! (In C) 
All this for ONLY $200.00! Whew! 

Add S3. 50 shipping 



s UniCharger 



Brian Lantz' 



With UniCharger on you system you will think that you're 
running Unix. UniCharger adds 29 commands to your basic 
system that really makes it shine. This is Brian Lantz's 
first major project for OS9 and it showed the rest of us what 
he can do. Turn your computer into a real powerhouse with 
UniCharger. ONLY $150.00 and worth it! 
,. Add S3. 50 shipping 



UtlllX by Harry Fair 

Harry was deeply involved in the development of ABasic 
and has done considerable work behind the scenes for OS9. 
Now we have Ulilix, 15 utilities that work like their Unix 
counterparts, cat, code, crypt, diff, display, grep, lower, 
upper, pack, unpack, pr, sort, tail, time, and wc. All these 
for ONLY $49.95! 'diff alone is worth the price! 
„ Add $3.50 shipping , 



SDisk & Bootfix 

Replace your Tandy disk driver module wilh one thai works 
wilh all drives. You can change individual step rates to 6ms 
and even use standard OS9 format. A must for double sided 
drive users. Includes its own format command. ONLY 
$29.95, $35.95 with Bootfix. (for booting from double 



sided drives) 



Add $3.50 shipping 



OS9 BOOKS 

OS9 it ii Iradtmik cf MECNMMN Inc. 

Complete Rainbow Guide to 05-9 $18.95 
Basic09 Tour Guide $18.95 
Official OS9 Manual Set $40.00 

Find out what Tandy left out. 
RMA Manual $25.00 

Use the relocating assembler thai you get with Tandy's C. 
, Add $3.50 shipping . 
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770 James St., Syracuse, NY 13203 Telex 646740 

315/474-7856 



WE'VE OUTDONE OURSELVES! 



DS-69A DIGISECTOR 

THE VIDEO DIGITIZER NOBODY CAN BEAT! 

The DS-69A is the best video digitizer available for your COCO at any price. This new, turbocharged version of our 
original DS-69 Digisector allows your64K COCO to see clearly into the world of any television picture. 



rfC^ 



SPEED! 

PRECISION! 

RESOLUTION! 

Compabitibility 

Compactness 

Convenience 

Ease of Use 



The fastest — 8 images per second! 

The highest — 64 levels of true grey scale! 

The finest — 256 x 256 picture elements! 

Use with a black and white or color camera, a VCR or tuner. 

Self contained in a plug in Rompack. 

Use with a Y-cable, Multi-Pak, PBJ Bus or plug directly into the cartridge slot. 

Software on disk will get you up and running fast! 



POWERFUL C-SEE™ SOFTWARE 

C-SEE is the menu driven software package included with your DS-69A. Available on disk or cassette, it provides 
lightning fast 5 level digitizing to the screen, high precision 16 level digitizing for superb hard copy printout and 
simple keyboard or joystick control of brightness and contrast. Or call our driver routines from your own Basic 
program for easy 64 level random access digitizing. Pictures taken by the DS— 69A may be saved on disk or 
cassette by C-SEE and then edited with COCO MAX, MAGIGRAPH or GRAPHICOM for special effects. Any of the 
popular printers may be used to obtain printouts of images digitized by the DS-69A. 

ONE YEAR WARRANTY 

DS-69A Digisector & C-SEE III Software $149.95 

OR your DS-69 & $ 59.95 

MAGIGRAPH Graphics Editor on disk $ 39.95 



DS-69 DIGISECTOR " 

THERE'S ONLY ONE BETTER VIDEO DIGITIZER. . . 

And that's the DS-69A. The DS-69 is The Micro Works' original video digitizer, tried and true since 1984. It provides 
almost all the features of the DS-69A and is now available at a new low price. The DS€9 features; 

SLUGGISHNESS 2 images per second. Quick enough to freeze all but the fastest moving pictures. 

IMCOMPATIBILITY Brightly colored scenes may be striped when using a color camera. 
INCONVENIENCE Will not work with a Y cable. 

Otherwise, it's a DS-69A. Precision, resolution, compactness, ease of use, software and warranty. 
Except one last thing. 

DS-69 Digisector & C-SEE III Software $ 99.95 

Superb image quality produced by both Digisectors. 





Screen 




Screen 



Printout 



NO RISK GUARANTEE 

If you are not completely satisfied with the performance of your new DS-69A or DS-6 
you may return it, undamaged, within ten days for a full refund of the purchase prici 
We'll even pay the return shipping. If you can get any of our competitors to give you 
the same guarantee, buy both and return the one you don't like. We know which one 
you'll keep. 



Purveyors of Fine Video Digitizers Since 1977. \AA2) 



Terms: Visa, Mastercard, Check or C.O.D. 



P.O. Box 1110 Del Mar, CA 92014 (619) 942-240 



In BASIC09, if a simple string or 
numeric variable is used without being 
declared in some way, the variable will 
be automatically dimensioned with a 
default size. A string will be set to 32 
characters, while a number will be real 
(floating point decimal). These defaults 
will seldom be the ideal. Integer and 
byte variables take less memory, run 
faster and can be used in most cases. A 
string may be as short as one character 
to get a 'y' or 'n' response, or can be 
thousands of bytes long to form a buffer 
into which characters are poked. Al- 
ways declare your variables with DIM 
or PARAM. 

OS-9 makes available a number of 
control codes to manage the alpha and 
graphics screens. These codes are sum- 
marized on Page 131 of your red OS- 
9 commands manual. BASIC09 uses them 
by printing them to the standard out- 
put. OS-9 intercepts them and routes 
them for action. The code "02" initiates 
the position alpha cursor operation, 
which is followed by two values, one for 
the column across the screen plus 32 and 
the other for the row down plus 32. The 
screen starts at Column 0, Row 0. An 
ending semicolon (;) holds the cursor at 
the selected location and END sends 
control back to the calling procedure. 

The procedure "isupper" is designed 
to convert lowercase letters in a string 
to uppercase. One use is to convert 
menu and prompt response characters 
so you need only test for uppercase 
characters. 



PROCEDURE 


Isupper 


9999 


DIM count. line length: ISTECER 


999* 


PASAH ansver:STRINC(25] 


w» 


DIH ascll: INTEGER 


PJJ1E 


DIM chac:STRING[l] 


W2A 


DIH uork strlng:STRING[25] 


(1(136 




(1(137 


count:-! 


W3E 


line length:-LEN(ansuer) 


99" 


vork string:-"" 


«4E 




PP4F 


WHILE count<llne length-t-1 DO 


JJ05F 


ascil ; -ASC(MIDS (answer , count . 1) ) 


JJP6E 


IF ascll<96 THEN 


99T- 


char:-CHRS(ascll) 


WB3 


work scrlng:-work strlng-t-char 


UOBF 


count : -count+l 


P?9A 


ELSE 


W?E 


char:-CHP.5(ascll-32) 


WAA 


vork string:-work string+char 


WB6 


count : -count+l 


«C1 


END IF 


9?" 


ENDWHILE 


99C1 




(JjJCB 


answer: -work string 


9909 


END 



All "isupper" variables are DIMen- 
sioned at the start of the procedure. The 
contents of the string variable "answer" 
will be supplied by the calling procedure 



so it is dimensioned using the keyword 
PARAM. All other variables are local 
to "isupper" and are dimensioned using 
the keyword DIM. A number of vari- 
ables of the same type may be included 
in a single DIM statement as long as 
they are separated by commas. Varia- 
bles "count" and "line_length" are in 
the same statement and "ascii" could 
have been added as well. String varia- 
bles "char" and "work_string" require 
different dimensioning statements since 
their lengths are different. 

Variables declared with DIM are 
local to the procedure where they are 
declared. This means you can use the 
same variable name in another proce- 
dure to mean something entirely differ- 
ent. Compare this to Color basic where 
variables are global and have a single 
meaning anywhere in the program. 

You can write an assignment state- 
ment four ways. The forms "LET 
count=I", "LET count:=l", "count=l" 
and "count:=I" will all work. The last, 
"count:=l," models PASCAL syntax and 
is preferred. 

After the variables are declared they 
must be initialized. Variable declaration 
sets aside memory space for the varia- 
ble, but does not change what is in that 
memory space, which could be any- 
thing. This also is different from Color 
BASIC where all numeric variables are 
initialized to zero and all strings are set 
to null when a program is first run. So, 
the statement "work_string:=""" is vital 
if "isupper" is to function. 

FDR. . .TO. . .NEXT is the only loop 
control statement in Color BASIC. 
BAS1C09 provides four plus a special 
form of IF'THEN (EXITIF...THE 
N...ELSE...ENDEXIT) to escape from 
a loop. I choose to use the WHILE 
...DO... ENDWHILE in "isupper" 
though I could have used any of 
the looping control structures. 
WHILE.. .DO makes a test at the very 
beginning and does the code in the loop 
only if the test proves "true." If 
"isupper" is sent a null string, and 
line_length=0, the program jumps over 
the WHILE. ..DO and returns "answer" 
unchanged to the calling procedure. 
This avoids an error in the statement 
ascii:=ASC(MIDS(answer .count, 1)). 

The contents of "ascii" will be the 
ASCII value of a character from the 
"answer" string. If this value is less than 
96, the character must be a non- 
lowercase character and can be added 
directly to "work_string." If the charac- 
ter is lowercase, 32 is subtracted from 
its ASCII value yielding the ASCII 
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/word Triad\ 




STOPS 




k the competition! J 




STOP & COMPARE! 




WORD TRIAD -3 INI 


WORD 
TRIAD 
(TM> 


OHJRO 




1). POWERFUL WORD PROCESSOR 




hour (4) Screens: 32x16, 51x24, 64x24, 85x24 


Yes 






Written In High Performance, Powerful 








Machine code 


Yes 






Available in 16K, 32K, 64 Versions 


Yes 






Extended BASIC is NOT Required! 


Yes 






"RAM DISC" extra text storage 


Yes 






Loads in single load, does not occupy disk 


Yes 






Menu-driven disk & cassette I/O 


Yes 






Over 100 Support Function Keys 


Yes 






Full Screen cursor control with auto 








repeal keys 


Yes 






Compatible with ANY Primer 


Yes 






Able to insert Control Codes 


Yes 






5 separate priming modes 


Yes 






Auto Double column printing 


Yes 






Baud rate up to 9,600 baud 


Yes 






Each key depression produces a sound, 








so you just type 


Yes 






"Typewriter mode" saves paper 


Yes 






"Programmable word/phrase" saves time 


Yes 






Displays underlined words on Screen 


Yes 






True lower & upper case characters — 








true descenders 


Yes 






Perfect margin justification 


Yes 






Auto centering — page numbering 


Yes 






NO hardware modifications needed 


Yes 






Select lines per page — force new- page 


Yes 






Three (3) Search modes 


Yes 






Recall accidental deletions 


Yes 






Block copy & Block move 


Yes 






Page forward & Backward in memory 


Yes 






"Margin Offset" allows any number of 








letters petrified — ariwork/icxt combined 








together. 


Yes 






Complete 66 page manual included 


Yes 






2). CONVENIENT TERMINAL PROGRAM 








Select Host or terminal mode 


Yes 






Upload or Download Programs 


Yes 






Talk mode, open/close buffer, auto 








open/auio close buffer 


Yes 






Send control letters, block control codes 


Yes 






Use buffer for complete editing 


Yes 






Send contents of buffer to primer 


Yes 






3). HELPFUL UTILITIES PROGRAM 








Load any program into buffer for 








examination or changes 


Yes 






Edit or examine ANY high level language, 








such as BASIC 


Yes 






Allowed to view ALL the Computer's 








memory 


Yes 






Language function key to help make writing 








high level language easier 


Yes 






"RAM TEST." a complete memory 








diagnostic program 


Yes 






WORD TRIAD™ @ 




1). Disk version has ALL Options 




Suggested Reiail Price (S.R. P. 1559.95 




Special INTROduclory price — NOW ONLYS44.95 




2). 32/64K cassette tape version 




all options except disk (S. R .P. ) 549.95 




Special INTROducmry price — NOW ONLY 534.95 




31. 16k cassette tape version — memory 




limitations do not allow for Hi-Res Screens. 




double column 




print/RAM DISC (S.R.P.IS39.95 




Special INTROductory price — NOW ONI Y 524.95 




Eslra Special Bonus offer: We pay ALL postage. 




shipping & handling charges plus any applicable 




WORD TRIAD is Published by: Lewis & Clark 




Software 




To order, send check or money order to: 




Distributed by: COST PLUS ELECTRONICS 




P. O. Box 6467 - 301 S. Staples St. 




Corpus Christi. Texas 7841 1 




15121881-9540 




For Visa and MasterCard orders only please call 




Nationwide Toll Free 1 -800-82 1-0728 




or in TEXAS 1-800-292-5619 




Write for free brochure — dealer and distributor 




inquiries welcome 
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RAINBOWfeil/PCMfeit 

Chicago, Illinois 
Dates: May 23-25, 1986 
Hotel: Hyatt Regency-Woodfield 
Rooms: $60 per night, 

single or double 
Advance Ticket Deadline 
May 16, 1986 



^ 



RAINBOWfest is the 
only computer show 
exclusively dedi- 
cated to your Tandy Color 
Computer. Nowhere else 
will you see as many pro- 
ducts, have access to the 
top experts, or be able to 
attend free seminars. It's the 
next best thing to receiving 
the latest issue of the rain- 
bow in your mailbox! 
Every RA/NBOWfest fea- 
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Shew Schedule: 
PfflBy evening 

:s open Iron- 
Saturday 
- CoCo Community Bre.v 

pen il 10 am antj r.iose at t 






, 




tures many delightful sur- 
prises. It's a great opportu- 
nity for commercial pro- 
grammers to show off new 
and innovative products for 
the first time. You get the 
jump on new capabilities for 
your CoCo. In exhibit after 
exhibit, there are demon- 
strations, opportunities to 
experiment with software 
and hardware, and special 
RAINBOWfest prices. 



You can set your own 
pace between visiting ex- 
hibits and attending the val- 
uable, free seminars on all 
aspects of your CoCo — 
from improving basic skills 
to working with the sophis- 
ticated OS-9 operating sys- 
tem. 

Many of the people who 
write for the rainbow — as 
well as those who are writ- 
ten about — are there to 
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meet you and answer your 
questions. You'll also meet 
lots of other people, just like 
you, who share your inter- 
est in the Color Computer. 
It's a person-to-person 
event, as well as a tremen- 
dous learning experience, 
in a fun and relaxed atmos- 
phere. 

To make it easier for you 
to participate, we schedule 
RAINBOWfests in three 
parts of the country. If you 
missed the fun in Palo Alto, 
California, why don't you 
make plans now to join us in 
Chicago? For members of 
the family who don't share 
your affinity for CoCo, 
you'll be comfortable know- 
ing that RAINBOWfest is 
located in an area with 
many other attractions. 



N/N/N/ wv- 



The Hyatt Regency- 
Woodfield offers special 
rates ($60, single or double 
room) for RAINBOWfest. 
The show opens Friday eve- 
ning with a session from 7 
p.m. to 10 p.m. It's a 
daytime-only show Satur- 
day — the CoCo Commu- 
nity Breakfast (separate 
tickets required) is at 8 a.m., 
then the exhibit hall opens 
promptly atlOa.m. and runs 
until 6 p.m. There will be no 
exhibition hours or semi- 
nars Saturday evening. On 
Sunday the exhibit hall 
opens at 11 a.m. and closes 
at 4 p.m. 

Tickets for RAINBOWfest 
may be obtained directly 
from THE RAINBOW. We'll 
also send you a special 
reservation form so you can 



get your special room rate. 
Come to RAINBOWfest! 



■iPsisjim 



Your admis- 
sion to RAIN- 
BOWfest also entitles you to 
visit -PCMfest! It's a show 
focusing on Tandy's new 
generation of computers — 
the Tandy 1000, 1200, 2000 
and 3000 MS-DOS compu- 
ters, and the Tandy 100, 200 
and 600 portables. 

PCMfest is sponsored by 
oursister publication, PCM, 
The Personal Computer 
Magazine for Tandy Com- 
puter Users. The show will 
be in the same location as 
RAINBOWfest and the ex- 
hibit hours will be exactly 
the same. If you use one of 
the newer Tandy compu- 
ters, don't miss it. 



Join us at a Mure RAINBOWfest! 



RAINBOWfest Princeton, N J 
Date» - '986 

Hotel: Hyat! Reger 



Roams: $79 per night, single Of double 
Advance Ticket Deadline: Oct H 



f-HEE T-Shm lo t irsi live ticket orders received <rom each state 
FREE RAINBOW poster lor fust 500 ticket oroe'B tecelveo 



YES, I'm coming to Chicago! I want to save by buying tickets now at the special advance sale price. 
Breakfast tickets require advance reservations. 



Please send me: 

Three-day tickets at $9 each total 

One-day tickets at $7 each total 

Circle one: Friday Saturday Sunday 
Saturday CoCo Breakfast at $1 2 each total 

Handling Charge $1 $1Q0 

TOTAL ENCLOSED 

(U.S. Currency Only, Please) 
D Also send me a hotel reservation card for the Hyatt 
Regency-Woodfield ($60, single or double room). 



Name (please print) 

Address 

City 



State 



.ZIP 



Telephone 

Company 

□ Payment Enclosed, or Charge to: 
D VISA □ MasterCard □ American Express 

Account Number 

Exp. Date 

Signature 



Make checks payable to: The RAINBOW. Mail to: RAINBOWfest, The Falsoft Building, 9509 U.S. Highway 42, P.O. Box 385, Prospect, 
KY 40059. To make reservations by phone, call: (502) 228-4492. 

Advance ticket deadline: May 16, 1986. Orders received less than two weeks prior to show opening will be held for you at the door. Tickets will 
also be available at the door at a slightly higher price. Tickets will be mailed six weeks prior to show. Children 4 and under, free; over 4, full 
price. 
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value of its uppercase equivalent. The 
character having this value is found and 
added to "work_string." 

Each control structure has a unique 
END word. This is because these struc- 
tures may span many lines of code and 
BASIC09 has no other way of knowing 
what belongs with the control structure 
and what does not. Color BASIC is no 
different. Each FOR must have a NEXT, 
which may be many lines down. IF 
. . .THEN. . .ELSE must be on a single 



"OS -9 makes available 
a number of control 
codes to manage the 
alpha and graphics 
screens. These codes 
are summarized on 
Page 131 of your red, 
OS-9 commands man- 
ual" 



line so the next line number gives Color 
BASIC the structure termination infor- 
mation it needs. In "isupper" ENDIF 
terminates the IF. . .THEN. . .ELSE 
structure. The following ENDWHILE 
does the same for WHILE. ..DO, send- 
ing the program to the test in the 
WHILE.. .DO. If the test is false, control 
goes to the line following ENDWHILE. 
This line, answer:=work_string, as- 
signs an all uppercase string to 



"answer," which returns it to the calling 
procedure. The END is optional, but is 
good programming practice making the 
procedure more readable. 

You can run "printat" and "isupper" 
from BASlC09's System Mode, but you 
will not fully see what they do. A better 
way is to write a short procedure that 
uses each and demonstrates what they 
do, as the following "demo" procedure 
does. 



PROCEDURE 


demo 


9999 


DIM tempS:STRING[l] 


9W 


DIM answer: STRING[25] 


0018 


REPEAT 


W1A 




001B 


PRINT CHR$(12) 


0020 


PRINT 


(3022 


PRINT "Enter string." 


0033 


PRINT 


PP35 


GET #0, answer 


003E 


RUN isupper(answer) 


m» 


RUN printat(2,10) 


0053 


PRINT answer 


0)358 


RUN printat(2,12) 


0063 


PRINT "Enter another? 


0079 


RUN printat(2,14) 


0084 


GET #0,tempS 


008 D 




008 E 


RUN isupper(tempS) 


0098 


UNTIL tempS-"N" 


00A4 


END 



y/n" 



The procedure "demo" uses only two 
variables that are both dimensioned 
with DIM statements. The variable 
"temp" is one character long and is used 
to get single key responses from the 
keyboard. String variable "answer" can 
take up to 25 characters from the key- 
board. 

A REPEAT. .UNTIL loop makes its 
test at the end of the loop, so its code 
will always be executed at least once. It 
is an excellent control structure where 
you want to repeat until the user indi- 
cates "quit" with a particular keystroke. 



Printing CHRS(12) clears the screen. 
This is the same as CLS in Color BASIC. 

"GET #0, answer" gets characters 
from the keyboard, path #0, and puts 
them into the variable "answer" until its 
25-character limit is reached or until it 
sees a carriage return (F.NTER). 

The procedure "isupper" is run with 
the string "answer" supplied as a pa- 
rameter. It converts the string to all 
uppercase and returns the string in the 
variable "answer," which is printed to 
prove the fact to you. Notice the use of 
"printat" to position the cursor on the 
screen. Actual numbers are used as 
parameters, but these could have been 
integer-type variables. 

Finally, the user is asked if he wishes 
to enter another string. Since a single 
character response is needed, the one 
character string variable "tempS" is 
used in the GET statement, eliminating 
the need for the user to type both the 
character and an ENTER. The statement 
"RUN isupper(tempS)" does any 
needed case conversion. If tempS="N", 
the test after UNTIL is true and the 
procedure ends. Note that when testing 
for equality, tempS="N", only the equal 
sign is used, the colon-equal symbol (:=) 
is reserved for assignment statements 
only. 

We have covered a little about a lot 
of things in this article. We have seen 
part of the operation of the System and 
Edit modes. I have also given you two 
useful procedures and a program to 
demonstrate them to get you some 
hands-on programming. I have passed 
right by some things I don't use as 
much, if at all. We will pick some of 
these up in later columns. 

Our last bit of business is how to 
depart BASIC09 from the System Mode. 
Type bye and press the ENTER key. ^ 



ASSEMBLY LANGUAGE PROGRAMMING for the TRS-80 COLOR COMPUTER 



At Last - The book exclusively for you and your CoCo ! ! 
You've learned BASIC and are now ready to learn assembly 
language programming. This hands-on guide begins with the 
basics and progresses to the expert level; revealing 
programming conventions and techniques and all the 
internal capabilities of the TDP-100, CoCo 1 and 2. At 
every step of the way are illustrations, sample programs, 
and plain English explanations. All sample programs are 
shown as assembled with Radio Shack's EDTASM*- cartridge. 
Plus, a complete chapter explains how to use all EDTASM+ 
capabilities. This book describes how to write 
subroutines, interrupt handlers, programs that control 
the graphics display modes, cassette, disk, keyboard, 
sound, joysticks, serial I/O, interrupts, and use of ROM 
resident subroutines. Not only is the HC6809E 
microprocessor described, but also the video display 
generator (VDG), peripheral interface adapters (PIA), and 



how they all work together. This book is suitable as a 
high school or college textbook. 

CHAPTERS : The Binary Number System - Memory and Data 
Representation - Introduction to MC6809E Microprocessor - 
Addressing Modes of the MC6809E - MC6809E Instruction 
Set - Assembly Language Programming with EDTASM+ - 
Assembly Language Programming - Assembly Language and 
Extended Color BASIC - Internal Control and Graphics - 
Technical Details. 

289 pages TRS-80 & EDTASM+ are 

soft cover trademarks of Tandy Corp 

$16.00 U.S. plus $1.50 shipping. Check or money order. 

RI residents please add 6% sales tax. Volume discounts 

are avai I able. 

Published and TEPCO 

sold by 30 Water Street 

Portsmouth, RI 02871 
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BARDEN'S BUFFER 



Listening to 
Your CoCo with 
Assembly Language 



By William Barden, Jr. 
Rainbow Contributing Editor 



One of the nice things about as- 
sembly language is that it gives 
you access to parts of the com- 
puter that just can't be handled through 
BASIC. Take sound effects and music, 
for example. Sure, you can use SOUND 
in Extended BASIC to sound a tone for 
a certain length of time. You can also 
use the PLAY command in Extended 
BASIC to play musical notes. However, 
with BASIC you are limited to these 
short, simple tones. Assembly language, 
on the other hand, allows you to create 
a variety of complex sounds. Want a car 
crash, a phaser blast, or the sound of an 
Apple lie being dropped from the top 
floor of One Tandy Center? Assembly 
language is the only way to go. Would 

Bill Barden has written 27 books and 
over 100 magazine articles on various 
computer topics. His 20 years expe- 
rience in the industry covers a wide 
background: programming, systems 
analyzing and managing projects rang- 
ing from mainframes to microcompu- 
ters. 



you believe that these sounds are al- 
ready programmed into your CoCo? I'll 
show you how to unleash the CoCo's 
sounds in this column. Actually, there'll 
be two major themes this month. First, 
we discuss assembly language sounds. 
Secondly, I'll show you how to plan and 
use a Sound program, for those of you 
who are still a little shaky about using 
EDTASM+ or Disk EDTASM. As I 
mentioned last month, you OS-9 users 
can still benefit from the column, but 
the examples will be in EDTASM 
format. 

Color Computer Sounds 

Sounds on the Color Computer are 
generated quite differently from sounds 
on the Tandy 1000 or other systems. 
Many other systems contain a sound 
synthesizer chip. This is an integrated 
circuit similar in appearance to many of 
the chips you'll see inside the CoCo. 
Internally, though, a sound synthesizer 
chip contains logic to generate square 
waves or sine waves and to create 
different envelopes that determine the 
wave shape. 



The Color Computer does not use a 
sound synthesizer chip. Instead, it 
creates sounds by electronic logic that 
makes up a digital-to-analog converter. 
I'll call this logic a DAC for short. The 
CoCo DAC is a "six-bit" DAC, meaning 
that it will convert a digital value of zero 
through 63 into 64 different voltage 
levels. The CoCo DAC uses the upper 
six bits of a byte in the conversion. Here 
are the results we'll get with a range of 
values: 



Digital Value 


Voltage Output 


00000000 


.23 volts 


00000100 


.30 


00001000 


.37 


00001100 


.44 


00010000 


.52 


00010100 


.59 


00011000 


.66 



11 11 1000 
II II 1100 



4.69 
4.76 
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As Produced by 
Electronic Devices 



As Produced by 
Color Computer 



64 
56 
48 
40 
32 
24 
16 

8 





Figure 1: Sine Waves 




ADOS 



ENHANCED, EPROM-ABLE 
DISK BASIC 



Now. you can suporchargo Basic with an impressive array ol e»lia features 
WITHOUT sacrificing compatlbilily 1 ADOS is compatible wilh virtually lOO°.'i ol 
commercial software. Customizing utilities are provided to allow user-defined 
command abbreviations, baud rate, step rate. Iracks por disk (35 or 40), support ol 
doubiesided drives, ana more. After customizing ADOS, you can have it burned Into 
an EPROM that plugs into the Disk Basic ROM socket, or )ust use it m RAM as a 64K 
disk utility. (EPROM + burning will cost aboul S20-wc provide inlormation 
concerning how you can have this done) Features include: • ropoat and edit ol the 
last direct-mode command • 26 definable conlroi-key abbreviations • automatic lino- 
number prompts • DOS command • lowercase commana entry (a lino complement to 
a LOworkil w PBJ WordPak) • COPY (filename) to (drive number) • AE error override 
option • RAM command (64K) • RUNM command • toxl echoing to printer • ML 
monitor • teit die scan ■ enhanced directory • error trapping • hires tent utility 
included (42. Si, ot 64 characters per line) 

-I COULD NOT FIND ANY SOFTWARE THAT WOULD NOT RUN UNDER ADOS." 

THE RAINBOW, Docombor 1984 
"I LOVE ADOSI . . . A GENUINELY FIRST RATE PRODUCT." 

Color Micro Journal, February 1905 
"I WONT PART WITH MY ADOS EPROM FOR ANYTHING . . . NO COMPATIBILITY 
PROBLEMS." 

HolCoCo.May 1985 
Disk 127.95 



THE PEEPER 



ML PROGRAM TRACER 



Monitor machine-language programs AS THEY ARE RUNNING' Peeper aclually 
timoshares wilh the target program, giving FULL CONTROL as ML programs run. 
Switch instantly between watching regular program output and Peeper's trace ot 
registers and stack on scroon or printer. Inspect memory In any ol 26 display modes. 
Execution speed can be varied Irom full speed to the barest crawl, or halted entirely, 
as programs run. Single-stepping, breakpoints, memory or register o«amme/change. 
Relocatable, supports 64K use. (16K required) See February '85 review 
Disk. 523.95 Tape S21.95 Assembler source listing Add 3,00 



FASTAPE 



THE NEXT BEST THING TO A DISK DRIVE 



Faslopo allows cassette I/O at 3000 baud-TWICE NORMAL 5PEED. tl uses the high- 
speed (POKE 65495.0) modo, and makes it convenient to stay in mis mode 
throughout. Features automatic adjustment ol cassette and printer paramelers when 
spood modo is changed. Control-key (unctions for many Basic commands and lor 
changing speed modes. Compatible with all (He typos, and can be usod with 
Tolewnier 64 nnd many olhflf lope utilities. (16K requlrod) See July 'B3 review 
.12KU5 ill QSiNEW DISCOUNT PHICC: 



'T«p« 



SPECTROSYSJEMS; 



fSi 



No delay on personal checKs 
Please add S2 00 shipping Sorry 



11111 N. Kendall Drive. 
Suite A 108 
Miami. Florida 33176 
(305) 274-3899 Day or 



no credil cards or COD'S 



**Zo> 



fiW 



THE 



Or 



IE RAINBOW'S 

)ne-Liner Contest 
las now been expanded 
to include programs of 
either one or two lines. This 
means a new dimension and new 
opportunity for those who have "really 
neat" programs that simply just won't fit in 
one line. 

Here are the guidelines: The program must 
work in Extended basic, have only one or two 
line numbers and be entirely self-contained — 
no loading other programs, no calling ROM 
routines, no poked-in machine language code. 
The program has to run when typed in directly 
(since that's how our readers will use it). Make 
sure your line, or lines, aren't packed so tightly 
that the program won't list completely. Finally, 
any instructions needed should 
be very short. 

Send your entry 
(preferably on cassette) to: 
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16 
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(18 Intervals) 



Figure 2: Staircase Steps in Wave Forms 




Note that the the lower two bits of the 
digital value are always zero — only the 
upper six bits change. You can also see 
that the step size of the voltage output 
is constant. There is always about 0.07 
volts between one digital value and the 
next. 

All well and good, but how does the 
DAC create sounds? Let's take an 
example. The purest sound is a sine 
wave, shown in Figure l. The second 
part of the figure shows a comparable 
sine wave generated by the DAC. When 
fed into an audio amplifier, the result 
will be a relatively pure musical tone, 
similar to that produced by an elec- 
tronic doorbell, or a Dolby test tone. 

If you look closely at the DAC sine 
wave, you can see that it's made up of 
a series of discrete voltage levels, giving 
it a "staircase step" appearance. The 
closer the interval is between steps, the 
smoother the sine wave becomes, as 
shown in Figure 2. 

This sine wave was generated by the 
CoCo DAC from a table in ROM. 
Believe it or not, this is the way the 
CoCo generates the 1200 and 2400 hertz 
(cycles per second) tones used for 
cassette tape output! (I'll tell you where 
to find the table later.) 

The distance from crest to crest, or 
from trough to trough of the sine wave 
is called the period of the sound. The 
reciprocal of the period is the frequency 
of the sound. A 600 hertz tone, then, has 
a period of 1/600 seconds or about 1.66 
milliseconds (1.66 thousandths of a 
second). 

More Complex Sounds 

Imagine tuning in MTV and listening 
to a new heavy metal band playing sine 
wave synthesizers. It would drive the 
viewers to Mozart! Most natural and 
instrumentation sounds are made up of 
a combination of frequencies, as shown 
in Figure 3. Random sounds, such as 
surf or crowd noise, are made up of an 
even combination of all frequencies, 
giving a hissing effect. These are the 
sounds that BASIC cannot create on the 
CoCo with simply the SDUND and PLAY 
commands. 

A music synthesizer not only pro- 
vides the capability to generate the 
complex sound of strings or a flute, but 
it also allows the user to define an 
envelope for the sound. The envelope 
describes how the sound varies in loud- 
ness and is sometimes called an ADSR, 
for attack, decay, sustain, release, as 
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shown in Figure 4. A musical instru- 
ment such as a piano has a sustained 
sound, while an instrument such as a 
snare drum has a much shorter duration 
sound. Both envelopes are different, as 
shown in the figure. Synthesizers also 
provide the capability to create enve- 
lopes not produced by musical instru- 
ments, such as a sound that starts off at 
the minumum loudness and builds to a 
maximum, producing a sound like a 
musical lone played backwards on a 
tape recorder. 

Many complex sounds can be gener- 
ated by the CoCo, at the expense of 
building a table of values that define the 
wave shape of the sound. Another 
alternative is to use the patterns found 
in the CoCo's ROM, selecting those 
that produce the sounds you're looking 
for. A short section of BASIC ROM code 
from SA9EB through $A9FF on my 
systems, for example, produces the 
wave shape shown in Figure 5 when the 
upper six bits are considered. 

Any small section of code can be 
repeated over and over, and the interval 
between outputs to the DAC can be 
varied by timing loops within the assem- 
bly language program to produce differ- 
ent frequencies. As the shortest timing 
loop can produce periods that are about 
10 microseconds wide, the highest 
frequencies that can be produced in 
assembly language are 100,000 hertz 
radio waves (!), far above the 6,000 
hertz sound waves that can be passed 
through the CoCo electronics. That's 
the beauty of assembly language here — 
there's plenty of time left over. 



Talking to the PIA of the CoCo 

The output of the DAC goes both to 
the cassette output and to a device that 






ADSR for 
snare drum 



Figure 4: Sound Envelopes 



CoCo Cat 



Lprs see mou/... hou/ 

QOIST S0/M£ CO'ff/'tfFe/?. STOc< 

to i&imc out my {zxtRxjo? 



DEasio/JS, /xc/5/ovs... 
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Protect Your Valuable Magazine Collection With . . . 




DISTINCTIVE, 
DURABLE 
RAINBOW BINDERS 




Each issue of THE RAINBOW is a vital resource that you 
will refer to again and again, to gain insights, to explore 
new areas of interest or simply to refresh your memory. So, 
you need to keep your copies of THE RAINBOW safe — in 
high-quality, vinyl binders that provide complete protec- 
tion. 

These distinctive red binders not only ensure that your 
rainbows stay in mint condition, but they showcase your 
collection as well. Each binder is clearly embossed with the 



magazine's name in gold lettering on both the front and the 
spine. They're a handsome addition to any room. 

They also make it possible for you to organize your work 
space and eliminate the clutter on a permanent basis. You'll 
spend more time on your CoCo and eliminate those 
frustrating searches for misplaced magazines. 

A set of two handsome binders, which hold a full 12 issues 
of THE RAINBOW, is only $13.50 (please add $2.50 for 
shipping and handling). 






Special Discounts On Past Issues With This Offer 



To help you complete your collection of THE rainbow, 
we're offering a special discount on past issues with the 
purchase of one or more sets of binders. 

When you place an order for six or more back issues of 
THE rainbow at the same time you order your binders, you 
are entitled to SI off each magazine, which normally sells 
for the single issue cover price. For an order form, please 
refer to our "Back Issue Information" page (check Table of 



Contents under departmental listings). Also with this offer, 
copies of the "Official And Compleat Index To THE 
rainbow" (a comprehensive index of rainbow's first three 
years, July 1 98 1 through June 1984), usually priced at S2.50, 
may be purchased for only $1 with a set of binders. 

Due to heavy demand, we suggest you order back issues 
now while supplies last. 









YES. Please send me set(s) of RAINBOW binders at $13.50 per two- 
binder set (plus $2.50 per set for shipping and handling). If your order is to be sent via U.S. Mail 
to a post office box or to another country, please add $2. Kentucky residents add 5% sales tax. 
U.S. currency only, please. 

Order one or more sets of binders and take advantage of these exciting offers: 

I also want to take advantage of a special savings of $1 off the single issue cover price for back 
issues with the purchase of a set of binders. (Minimum order of 6 magazines. An order form from 
a recent issue indicating the back issues you wish to receive should accompany this order.) 

I want to purchase the first three-year index to the rainbow (July 1981 through June 1984) at 
the special price of $1 (regular price $2.50) with my purchase of one or more sets of binders. 



Name 

Address 
City 



State 



ZIP 



D My check in the amount of is enclosed. (In order to hold down costs, we do not bil 

Charge to: □ VISA □ MasterCard □ American Express 

Account Number Expiration Date 

Signature 

Mail to: Rainbow Binders, The Falsoft Building, P.O. Box 385, Prospect, KY 40059. 

To order by phone, call: (502) 228-4492 






WE'RE BRINGING THE COCO 



RAINBOW'S 
BROADENING ITS 
SPECTRUM 

the rainbow and the Delphi Informa- 
tion Utility have joined together to 
allow CoCo owners all over the 
world to connect with one another! 

Delphi is a full-service information 
utility. It offers everything from up- 
to-the-minute news stories from The 
Associated Press to electronic mail 
services. But, best of all, it now has 
a special forum for Color Computer 
owners, and it's operated by the peo- 
ple who bring you the rainbow each 
month. 

The CoCo Special Interest Group 
(SIG) features a variety of services, 
including an open forum where you 
can send and receive messages 
from Color Computer owners all 
over the world. It also has several 
databases to which you can upload 
your favorite programs and from 
which you can download programs 
written by other CoCo enthusiasts. 
Some of these databases are basic 
programming, OS-9 and home appli- 
cations. 

When setting up your account 
with Delphi, if you do not have a 
credit card or prefer not to use it, 
Delphi requires that you send $20 to 
give your account a positive bal- 
ance. This will be refunded after 
your first free hour if you choose to 
no longer use the system or it will 
be applied to future connect 
charges. 



PEEK INTO THE 
RAINBOW 

The CoCo SIG's conference feature 
allows you to meet electronically 
with other members of the CoCo 
Community. You can join conferen- 
ces with notables such as Fred 
Scerbo, Dan Downard, Ed Ellers, 
Lonnie Falk, Dick White, Tony 
DiStefano and others — on a regular 
basis. Conference schedules will ap- 
pear in the rainbow each month. Be 
sure to check online announce- 
ments for changes and additions. 



THE OTHER SIDE 
OF THE RAINBOW 

On Delphi, you also are able to buy 
rainbow on tape — order a whole 
set, or download an individual pro- 
gram immediately. You can also 
renew your rainbow subscription, 
make a fast and easy order for soft- 
ware or hardware from a multitude 
of vendors, or inquire about prod- 
ucts on the CoCo SIG. 

We also have a number of programs 
that you can download and use, just 
for the cost of the time you spend 
transferring them. There'll also be 
corrections for rainbow articles, 
helpful hints and many other useful 
features. 



FREE LIFETIME 
MEMBERSHIP 

the rainbow is offering subscribers 
a free lifetime subscription to Delphi 

— a $29.95 value — and a free hour 
of connect time — a $6 value at 
either 300 or 1 200 Baud during even- 
ing, holiday and weekend hours — 
so you can sample Delphi and the 
brand new rainbow CoCo SIG. 
That's right. Your subscription to 
the rainbow entitles you to this 
$35.95 value as a free bonus! 

If you're not a rainbow subscriber, 

just enter your order when you sign 
on with Delphi and you'll get the 
same great deal! For our $31 sub- 
scription fee, you'll get the finest 
Color Computer magazine ever, a 
free lifetime subscription to Delphi 
and a free hour of connect time. 



SAVE EVEN MORE 

Want to save an extra $15? While 
you're online, you can order the Del- 
phi Handbook and Command Card 
($21.95) and three hours of connect 
time ($18) for only $24.95. 

Delphi provides us all with Imme- 
diate CoCo Community. Check it 
out today. After all, you can sample 
it for free! 



Problems? Call Delphi: 

1-800-544-4005 



DELPHI 



TYPE: 

GROUP COCO 



COMMUNITY TOGETHER! 



How to reach RAINBOW'S Color Computer SIG . . . 



There are several ways to connect to Delphi and the 
rainbow's CoCo SIG. In most cities you will not even have 
to pay long distance charges; you can use special data 
communications networks, like Uninet, Tymnet and the 
Canadian Datapac network. 

First, set your terminal program to operate at either 300 
or 1200 Baud (depending on the modem you have), and 
also select either 1 bits with even parity or 8 bits with no 
parity, and one stop bit. (If one combination doesn't work, 
try another.) 

Decide which network you should use. There is no 
surcharge for Uninet or Tymnet. Canadian residents using 
Datapac will be charged an additional $12 (U.S.) per hour. 

On Uninet: Call (800) 82 1 -5340 to get the Uninet number 
for your area. After you call the appropriate number for 
your own area and make connection, you'll see a prompt 
of "L?" Press ENTER, the period key (.) and ENTER again. 
At the "service:" prompt, type GVC (for General Videotex 
Corporation) and enter. 

On Tymnet: Call (800) 336-0149 to get the Tymnet 
number for your area. After you dial your designated 
number and connect, you will see either "garbage" or a 
message saying "please type your terminal identifier." At 
this point, even if the screen is garbled, simply press 'A'. 
When "please log in:" appears, type DELPHI and press 

ENTER. 

From Canada (on Datapac): Call Delphi Customer 
Service at (617) 491-3393 to get the Datapac number for 
your area. After you connect, press the period key (.) and 
ENTER (use two periods if you're using 1200 Baud). Type 
SET 2:1, 3:12G and press ENTER. Now type p 1 310G, 
DELPHI ; and press enter. Delphi's new rates indicate an 
additional $12 hourly surcharge for evening use of 
Datapac, which means a total of S18 (U.S.) for connect 
time 

From other countries: Many countries have their own 
data networks that can connect to either Uninet or Tymnet. 
Check with the telephone authorities in your country for 
details on how to sign up for this service. When you have 
an account set up, you can reach Delphi with a "host code" 
of 312561703088 through Uninet, or 310600601500 
through Tymnet. (You'll have to pay the toll charges for 
this connection.) 

Type in Your Username 

If you're already a subscriber to THE rainbow, at the 
"USERNAME:" prompt, type RRINB0W5UB and press 



ENTER. At the "PASSWORD:" prompt, type your individ- 
ual subscription number from the mailing label of your 
latest issue of the rainbow. (If there are one or more zeros 
at the beginning of this number, include them.) 

If you don't already have a subscription, at the "USER- 
NAME:" prompt, type RPIINBOWORDER and press ENTER. 
At the "PASSWORD:" prompt, type SENDSUB and press 
ENTER. Have your MasterCard, VISA or American 
Express card ready, because you'll be led through a series 
of questions that will enable us to put your rainbow and 
Delphi subscriptions into effect. In an effort to hold down 
non-editorial costs, we do not bill for subscriptions. 

If you make a typing error, just press ENTER and start 
over. Remember that at any point, when you're on Delphi, 
you can type HELP to get help on how to use the system. 
To get off the system just type BYE. 

If you find that you're unable to log on to Delphi and 
enter the CoCo SIG after following these instructions, call 
us during afternoon business hours at (502) 228-4492. We'll 
be glad to offer assistance. 

Come Visit Us! Type: GROUP COCO 

After you sign in, you'll be prompted to set up your own, 
personal "user name" — Delphi is a friendly service, no 
numbers to remember — and you'll be asked a number 
of questions so Delphi can set up your account. You'll also 
be assigned a temporary password. No time is assessed 
against your free hour of service while you answer these 
questions. 

Delphi will tell you that your account will be ready after 
6 p.m. the same day if you sign up before noon (Eastern 
time zone.) If not, your account will be ready at 6 p.m. 
the next day. Once an account is opened, each rainbow 
subscriber will be credited with an hour of free time! 

When you log back in, use your chosen user name and 
your temporary password to access the system. At that 
point, you will meet Max, who will help you configure 
things and will change your temporary password into your 
own personal password. This is the password you will use 
for subsequent sessions — or until you change it. 



After Max bids you goodbye you'll wind up at the 
Delphi Main Menu; type in GROUP COCO and join us on 
the CoCo SIG! 




routes the DAC output to the television 
sound channel, as shown in Figure 6. 
The MC 14529 routes the DAC output 
to the TV sound channel by two "select" 
bits set by the following BASIC com- 
mands: 



180 POKE 8.HFF01,PEE!<(&HFF01) 
AND &HF7 'select bit 

190 POKE &HFF03,PEEK(&HFF03) 
AND &HF7 'select bit 1 

200 POKE 8.HFF23,PEEI<(&HFF23) 
OR 8 'set S-bit sound 

The third POKE here sets six-bit sound 
as opposed to a single-bit "on/ off" 
sound that can also be used. 

Once these commands are given, they 
need not be output again — the DAC 
is routed to the TV sound channel for 
the duration of the program. 

The six inputs to the DAC are con- 
trolled by six signals from another 



source, as shown in the figure. The 
source here, as in the case of the two 
select signals, is a PIA, or peripheral 
interface adapter. The CoCo uses a 
number of PIAs to provide program- 
mable signals to control color graphics, 
sound, cassette operations, and RS- 
232-C operations, to name a few. In this 
case, the PIA acts as a simple memory 
device, holding whatever six bits have 
been sent to it until another six bits are 
sent. In BASIC the six PIA to DAC 
outputs are set by 



1000 POKE S.HFF20, VflLUE»4 
'VALUE is - G3 

In assembly language, the instruc- 
tions are very similar: 

LDA #VALUE value is VVVVVVOO 
STA SFF20 outputs value to DAC 




To TV 
* Channel 
Modulator 



Lines 



Select 

Inputs 

(From$FF01, 

SFF03) 



Figure 6: DAC Routing 



And that's about all there is to pro- 
ducing sounds on the Color Computer 
— route the DAC output to the televi- 
sion channel and then send out the 
proper patterns to the PIA/ DAC, 
spaced at even intervals, repeating the 
patterns if necessary. 

Putting Together a Sound 
Assembly Language Program 

Now that we know enough about the 
sound capabilities of the Color Compu- 
ter, we can put together a short program 
to play a variety of sounds, natural and 
unnatural. What we're looking for is a 
program that will route the DAC output 
to the television sound channel and then 
output a series of digital values to the 
DAC, spaced at regular intervals. We 
also need the capability of repeating a 
series of values for a certain number of 
times. 

The data that creates the sounds will 
be held in a table in memory, either a 
table of values that already exist, such 
as ROM values, or a table that we will 
create. Since we want to make the 
program handle a table of varying 
length, we'll need to specify a table 
length. An alternative to this is to use 
a "terminating value" at the end of the 
table to mark the end. However, we'd 
like to use ROM data for some of the 
sounds, and it's awfully difficult to write 
data to ROM (although one of my 
CoCos tries this on occasion). 

To make the table values easier to 
generate, we'll also let the program shift 
the data so that it's aligned in the upper 
six bits. That way we can put values of 
zero through 63 in memory bytes with- 
out having to worry about what the 
values would be in their shifted form. Of 
course another approach is to "pack" 
the data into consecutive six bits, but 
this would present a real chore in 
creating and maintaining the table of 
data values. 

What we have so far, then, is a pro- 
gram that will read a table of values 
starting from some given memory loca- 
tion and ending at another memory 
location, with each byte in the table 
representing an output value of zero 
through 63. Such a table is shown in 
Figure 7 — it's the encoded form of a 
simple bell sound using a square wave 
frequency. 

Another thing that we need to specify 
to the program is the interval between 
DAC outputs. Remember, the smaller 
the increment, the less rough the final 
wave shape will be. What is a reasonable 
increment to implement? We know that 



244 



THE RAINBOW 



March 1986 



The OS-9 Library 




COMPUTERWARE 



macro Conditional Assembler 



MAC not only supports all 
standard mnemonics and di- 
rectives, but also thrives on 
Macros, Conditional Assembly, 
Repeat Sequences, inclusion of 
Source Library Files and more. 
MAC OS-9 produces OS-9 mod- 
ules and supports all the stand- 
ard Microware pseudops plus 
14 more! And we've included our 
Assembler Cross Reference 
program. $49.95 



witm'H'iH^ 



The perfect program editor! It is 
also compatible with our Text 
Formatter, for an excellent word 
processing team! It allows fast 
change, search, insert, and 
delete of text. You can move or 
copy individual lines or entire 
blocks with a single command. 
By using the disk as an exten- 
sion of memory, it can edit text 
files larger than memory. You 
can merge several files to 
create a new program. 

S39.95 



irHli'HllhllHl- 



Now get beautiful document- 
ation with OS-9! This text for- 
matter interfaces with any editor 
that produces standard ASCII 
text files. It is NROFF compatible 
(UNIX-type) and is easy to use. 
$34.95 



Disk Fix & Utilities 



by Harry Hardy 

Unleash the real power of OS-9! 
DISK FIX supports true double- 
sided/double density, 40 or 80 
tracks, and step rates of up to 6 
ms and each drive is separately 
configurable. (CCDISK included.) 
DMODE allows super easy mod- 
ification of drive descriptors. 
DIRCOPY is the most powerful of 
OS-9 copy utilities! PATCH is a 
user-friendly program for in- 
specting and modifying a disk 
file. FILELOOK displays file 
modules without loading them 
into memory. COMPARE com- 
pares a disk file to memory. 
S29.95 




RAID-Debugger 



by Chris Bone 

RAID is a screen oriented debug- 
ger with a built in disassembler, 
single step capabilities, memory 
window and access to the OS-9 
shell. It even has a built in hexa- 
decimal calculator! There are 
commands to modify registers, 
locate any module in physical 
memory, edit memory, set and 
kill break points, do selective 
disassemblies, execute modules 
by name or position, run shell 
commands, set offsets, single 
step from the program counter 
through the code, view the 
graphic screen, and more! S39.95 



iimpkui«# 



by Frank Delargy 

The Sourcerer is a menu driven 
symbolic 6809 disassembler 
that produces symbolic source 
code that can be assembled. It 
is compatible with most editor/ 
assemblers that produce ASCII 
files. $39.95 



Look n Listen Utilities 



by Brian Lantz 

This set of utilities includes a hi- 
res screen that is 27% faster and 
saves more than 3.5K over other 
drivers. The stand-alone sound 
utilities, SOUND, VOICE, and 
SND allow sound through OS-9 
independent of extra hardware. 
TALKER. TALK, and SPEAK are 
the driver, descriptor, and com- 
mand needed to use the Radio 
Shack SSC pak to output speech 
from the keyboard or from text 
files. Three special "boot" rou- 
tines are also included. 

$29.95 



tiWiliFM* - 



An industry standard for many 
years, it brings advantages to 
OS-9 users like extraordinary 
file capabilities with ISAM, 
Random, and sequential file 
structures; 9 or 11 digits of 
precision with BCD arithmetic; 
flexible user input commands 
for conversational programming; 
easy output formatting. This is 
a language written by program- 
mers for programmers. 

$69.95 



Advanced Utilities 



by Brian Lantz 

This set is designed for ffie 
advanced OS-9 user who wants 
serious tools! KSHELL has all the 
features of 6809 & 68K Shell 
version 1.1 plus more! KSHELL 
totally transforms your system 
by allowing wildcards with any 
utility. You can set the priority 
of your program when you 
start. The built-in PRINTERR 
routine can be switched on or 
off. Standard output & error 
paths can be overwritten or 
appended to from the command 
line. The selectable prompt can 
be changed to whatever you 
want. The PATH command sets 
up mutiple path directories to be 
searched when a command is 
given. 

In addition to KSHELL, 4 more 
utilities are included. UNLOAD is 
a repetitive unlink utility to 
remove modules. FLINK allows 
you to have many different boot 
files on a given disk & set which 
one to boot with next time. 
ARCHIVE backs up large disk 
media onto small disk media by 
filling one disk, prompting for a 
new disk. & continuing repeti- 
tively until all files are off- 
loaded. CPY is like the standard 
COPY plus more! It copies mul- 
tiple files to a given directory. 

$29.95 



Textools Utilities 



by Brian Lantz 

This impressive group of OS-9 

utilities for manipulating text 

files is especially powerful 

because they use meta (wild 

card) characters! 

$29.95 

CAT FGREP LOWER 

LS PACK PR 

QSORT RPL SPLIT 

TAIL TIME TR 

UNIQ UNPACK UPPER 

UPS WC 



mm- 



Add $2 surface or $5 air ship- 
ping. (California residents add 
6% sales tax.) 

Call or Write to: 

Computerware 

Box 668 

Encinitas, CA 92024 

(619)436-3512 

Ask for our complete catalog! 

Computerware* is a federally reg- 
istered trademark of Computerware. 
OS-9 is a trademark of Microware. 



we'll have to have a timing loop in the 
program to count off the time between 
DAC outputs. (Another alternative, 
however, would be reading in a PIA bit 
that shows the sync clock for video, 
appearing every 63.5 microseconds.) 
Even with assembly language, instruc- 
tions take a finite time and we can't 
define a small enough interval by the 
time the program is coded. We'll let the 
interval be specified by a count parame- 
ter to the assembly language program 
and see what the minimum interval 
turns out to be in the final result. 

A final parameter that must be spec- 
ified to the program is the number of 
times the table must be repeated. A 
repeat capability is handy to have to 
generate wave forms that are periodic, 
such as the sine waves and square waves 
mentioned above. We may want to 
repeat thousands of times with short 
tables of values to get a sound that is 
seconds long. 



At this point we have these parame- 
ters that must be passed to the assembly 
language program: 

• A 16-bit address that specifies the 
start of the table. 

• A 16-bit address that specifies the 
end of the table. 

• A 16-bit delay count that deter- 
mines the time delay between out- 
puts to the DAC. 

• A 16-bit repeat count that deter- 
mines the number of times that the 
table data is to be repeated. 

Program Design Considerations 

Before we start coding the program 
we need to make several more decisions 
about the basic design: 

• Is this to be a program or a subrou- 
tine? 

• Where in memory will the program 
be? 

• Where in memory will the table be? 



Start Table 



End ot Table 



o 

63 


56 


SO 


46 


40 


36 


32 


27 


24 


20 


16 


14 


11 



8 



6 




3 



Figure 7: Table for Bell Sound 



Programs Versus Subroutines 

We could make the Sound program 
a full fledged program that could be 
loaded by LOftDM and executed by EXEC 
(or from cassette by CLOADfl and EXEC). 
However, this doesn't make too much 
sense, as the program isn't really a full- 
blown program, but simply a short 
piece of code that can be used to (pre- 
sumably) generate short snatches of 
sounds. For that reason, it makes better 
sense to design it as an assembly lan- 
guage subroutine that can be called by 
BASIC (or other languages). That way 
we can use the convenience of BASIC to 
do all of the housekeeping and just call 
the assembly language subroutine when 
a sound is required. 

The commands that Extended BASIC 
uses to interface to assembly language 
are DEFUSR and USR. DEFUSR tells BASIC 
where the assembly language code is 
located, while USR actually transfers 
control to the assembly language sub- 
routine. The assembly language subrou- 
tine must always end with an RTS 
instruction, a ReTurn from Subroutine. 
The RTS acts just as a BASIC statement 
does, returning control back to the 
BASIC statement after the USR. The 
typical call to our yet-uncoded sound 
subroutine would look like this: 

110 DEFUSR0 = &H3E08 done only 
once in BASIC 



330 fl = USR0(0) 'call assembly 

language sub 
340 ... ' return here 

The dots between statements 1 10 and 
2100 represent other BASIC statements 
that are executed. One thing that must 
be done before the subroutine is exe- 
cuted, of course, is to set up a table of 
data in memory that the subroutine will 
use to generate sounds, or to point to 
the table if it already exists (such as the 
ROM sine wave table). 

Where in Memory Will the 
Subroutine Be? 

The DEFUSR statement defines where 
the assembly language subroutine is in 
memory. But just where should it be? 
There are many places it could be, but 
the overriding rule is to put it out of the 
way of basic. BASIC is constantly 
changing memory by adding variables, 
manipulating strings, and using a stack 
area, and any assembly language code 
must be put into an area that BASIC 
cannot touch. 
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Color Basic Compiler 

by Warren Ulrich III 

CBC lets you write in the familiar Extend- 
ed Basic and then converts it to machine 
language for you. It produces efficient, 
compact, machine code that is position 
independent, relocatable, and runs an 
average of 40 times faster! CBC features 
over 60 commands and functions, a 
subset of Extended Basic. The compiler 
is limited to integer variables, but varia- 
bles are easily passed betv/een a com- 
piled program and BASIC programs. 
Strings and multi-dimensional arrays are 
fully supported. (Write for a detailed des- 
cription.) Requires 32K. 

32K Disk S39.95 



Macro Conditional 
Assembler 

MAC not only supports all standard 
mnemonics and directives, but also 
thrives on macros, conditional assembly, 
repeal sequences, inclusion of source 
library files and more. The macro capabil- 
ities allow you to create standard subrou- 
tines only once, and then simply call 
them when they are needed. Conditional 
assembly allows you to have only one 
multi purpose source file, and then condi- 
tionally assemble various versions from 
one source. And we've included our 
Assembler Cross Reference program. 

32K RSDOS S49.95 64K OS-9 S49.95 



The Sourcerer 

by Frank Delargy 

The Sourcerer is a menu driven symbolic 
6809 disassembler that produces sym- 
bolic source code that can be assembled. 
It is compatible with most editor/as- 
semblers that produce ASCII files. Added 
features include automatic equate gener- 
ation for labels and symbols out of disas- 
sembly range; FCC, FCB, and FDB gen- 
eration; user defined symbol/label buffer 
area; and symbolic labels for all extended 
addresses. The position independent 
code is relocatable to any area of 
memory. 

16K Cass $34.95 

32K RSDOS $39.95 

64K OS-9 S39.95 

64K Screen Expander 

by Gregory Forseth 

The 64K Color Computer can have a 
64x24 or 51x24 upper and lowercase dis- 
play without hardware mods! Use it with 
BASIC and assembly language programs 
that use text displays. Added features 
include the mixing of text and hi-res gra- 
phics on the same screen; keyboard auto 
repeat; type ahead keyboard; two PRINT 
@ formats; ON ERROR command; auto 
line number; and an enhanced PMODE 
command that allows you to specify page 
the start page. Requires 64K. 
64K Cass S24.95 Disk $27.95 






Color Connection III 
for RSDOS 

by BJ Chambless 

This is the most comprehensive modem 
package for the Color Computer! All 
standard protocols are supported includ- 
ing CompuServe's Protocol B, XMODEM 
protocol, and XON/XOFF. Full support of 
the auto answer/auto dial feature for both 
Hayes compatible and Radio Shack 
modems is provided. You can use all 
baud rates when using the Radio Shack 
Deluxe RS232 program pack! A big buffer 
of up to 42K is offered (64K is required for 
maximum buffer size.) You can print 
directly from the buffer, and files bigger 
than the buffer can be uploaded and 
downloaded. The automatic XON/XOFF 
protocol downloads direct to disk as well! 
Printer baud rates are selectable from the 
software. 

The hi-res 51x24 screen has optional 
inverted colors and anti-truncation. All 
printable characters are available at the 
keyboard and all control characters are 
supported including ESCape, RUB, DEL, 
etc. Single key macros allow easy entry of 
often-used passwords and ID's with a 
single key touch. Our introduction to 
Data Communications tutorial and glos- 
sary of terms are included. You won't find 
a better telecommunication package 
anywhere! Requires32K, modem, and 
disk drive. 

32K RSDOS Disk $49.95 



Color Connection II 
Cassette 

by BJ Chambless 



for 



Color Connection II is an easy-to-use, 
menu driven terminal package. It sup- 
ports 300 baud, full and half duplex, and 
auto-dial for modems with this feature. 
The upload/download protocol is user 
defineable to allow you to customize your 
system to most standard hosts. Single 
key macros allow you to enter often-used 
passwords and ID's with a single key. All 
printable characters are available at the 
keyboard and all control characters are 
supported including ESCape, RUB, DEL, 
etc. Color Connection reads and writes 
ASCII files. You can upload and down- 
load these files using Ihe buffer. You can 
save your buffer to tape. It has a 51 x24 or 
32x24 screen display with selectable 
"inverted" screen and anti-truncation. 
Our "Introduction to Data Communica- 
tions" tutorial is included at no charge! 
Requires 16K. 

16K Cass S34.95 




Color Connection II 

for OS- 9 

by Brian Lantz 

Our OS-9 Color Connection is a great 
terminal package and really takes advan- 
tage of OS-9. The OS-9 shell is accessi- 
ble, so you can invoke any OS-9 com- 
mand! XON/XOFF software handshaking 
is supported. The expandable buffer 
allows you to save anything on the screen 
to memory. Macros allow you to enter 
often-used passwords and ID's quickly 
with a single key. There is a unique 12 
page on-line screen display with which 
you can view any of the last 12 screens 
even while the software is still receiving 
data! 

Color Connection II reads and writes 
standard ASCII files. The upload/down- 
load protocol is user defineable so you 
may customize your system to most 
standard hosts. All printable characters 
are available at the keyboard and all con- 
trol characters are supported. It supports 
300 baud, full and half duplex, and auto 
dial for modems with this feature. It is 
menu-driven and easy to use. A handy 
glossary of telecommunications terms is 
also included. Requires 64K, Disk, & 
OS-9. 

64K OS-9 Disk $49.95 



Mitsuba 1200 

(reg$275) $249.00 CoCo cable $25.00 

A perfect clone of the popular (and 
expensive) Hayes modem, the features 
include 1200 baud or 300 baud operation, 
direct connect, touch tone or pulse dial- 
ing, full or half duplex, speaker alert to 
busy signal, and complete compatibility 
with the Hayes Smarlmodem 1200. Buy 
now before they realize their mistake! 

CompuServe Starter Kit 

reg. S39.95 sale $27.95 

Includes 5 free hours, personal ID and 
password, user's guide, and a subscrip- 
tion to TODAY magazine. 



To Order 

Add S2 surface or $5 air shipping. Cali 
fornia residents add 6% sales tax. 

Call or Write to: 



COMPUTERWARE 



Box 668 Encinitas, CA 92024 
(619)436-3512 




Computerware Is a federally registered trademark ol Computerware. 0S-9 is a trademark of Microware. 



One of the best ways to do this is to 
use a protected area of high memory. 
The CLEAR statement in BASIC is specif- 
ically designed to protect memory so 
that assembly language subroutines can 
be put there. Doing a 100 CLEAR 
400.S.H3DFF for example, protects all 
memory from locations &H3E00 on up 
to the top of your RAM memory (512 
bytes less than 16K to the top of mem- 
ory). We'll use this area for the Sound 
program, and you might keep it in mind 
for your own programs. Of course, if 
you have a 64K system, you could use 
100 CLEAR 400,&H7DFF.' 

The 400 value, by the way, establishes 
the size of the BASIC string storage area. 
Use a larger value if you have many 
string manipulations in your program 
or if you have more than 64K. 

How does the assembly language 
code actually get into the &H3E00 area? 
We could load it in by a LOADM (or 
CLOADM), but it's a real convenience for 
a short subroutine like this to encode it 
into basic DATA statements and include 
it in the BASIC program. That way we 
have everything in one neat little pack- 
age. The DATA statements use values 
taken directly from the assembly lan- 
guage listing and look like this: 



120 DATA &HXX, &HXX, . . . &HXX 

121 DATA &HXX, &HXX, . . . &HXX 



where the XXs stand for machine lan- 
guage values. 

To move the machine language values 
in the DATA statements, a simple FOR' 
NEXT loop in BASIC is used: 

140 FOR I = &H3E00 TO 8.H3E2A 
150 READ ML 
1S0 POKE I, ML 
170 NEXT I 

The skeleton form of our BASIC call 
now looks like this (including signal 
routine to the TV channel): See Figure 



Where's the Table? 

The next question to resolve before 
actually coding the program is to deter- 
mine where the table of data is to be and 
how to tell the assembly language 
program where it is. We mentioned 
before that we'd like to explore some of 
the areas of ROM to see what kinds of 
sounds could be generated from the 
relatively random data found there. For 



that reason, we can't just use a preas- 
signed area of memory as a table. The 
table address, therefore, will not be 
fixed. 

In addition to the table address, we 
have to consider how the other parame- 
ters will be passed to the assembly 
language program. The USR statement 
allows for passing one 16-bit parameter 
to the assembly language program. This 
would only take care of one parameter, 
though, and we have four — table start, 
table end, delay count, and repeat 
count. 

There are a number of methods that 
can be used to pass more than one 
parameter, but we'll choose a simple 
one for this program — we'll put the 
parameters in memory right before the 



program at &H3E00. The assembly 
language program area will now look 
like Figure 9, a block of four parameters 
in eight bytes, followed by the (still) 
undefined assembly language code. The 
parameters can easily be poked into the 
&H3E00 area from BASIC, and we can 
change all of them at any time by doing 
a series of POKEs. 
Coding the Program 

Whew! We're finally at the point at 
which we can start coding the Sound 
program. Everything we've done up to 
this point has been program design. 
Generally, the more time spent in de- 
sign, the fewer changes we'll have in 
coding and debugging the program. 

Before coding this program, I gave 
some thought about what registers 



Figure 8: 

1(21)21 CLEAR 400.&H3DFF 'done at beginning of BASIC 
110 DEFUSR0 = &H3E08 'done only once in BASIC 

120 DATA &HXX, &HXX, ... &HXX 'machine language form 

121 DATA &HXX, &HXX, ... &HXX 'of assembly language 
14(21 FOR I - &H3E00 TO &H3E2A 'subroutine 

150 READ ML 'move the machine language to 

160 POKE I, ML 'the &H3E00 area - done once 

170 NEXT I 

180 POKE &HFF01,PEEK(&HFF01) AND &HF7 'select bit 
190 POKE &HFF03,PEEK(&HFF03) AND &HF7 'select bit 1 
200 POKE &HFF23,PEEK(&HFF23) OR 8 'set 6-bit sound 



330 A = USR0(0) 
340 ... 



' call assembly language sub 
' return here 



Protected 
Area 



S3E00 



Unprotected 
Area 



ACTUAL 



AREA 



1 



Table Start 

Table End 
Repeat Count 
Delay Count 



4 Parameters, 
8 Bytes 



Figure 9: AL Program Area 
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could be used to hold the parameters. 
In such a short program, it is possible 
to dedicate registers for specific func- 
tions. In longer programs, of course, the 
registers can't be dedicated to any 
specific thing, but handle all kinds of 
tasks. 

In Sound, the registers are set up this 
way: 

• Register A is used as the main "work- 
ing" register, holding the values to be 
sent to the DAC and other results. 

• Register X holds the 16-bit delay 
count. 

• Register U holds the table start in- 
itially, but is incremented by one to 
point to successively higher values in 
the table. 

• Register Y holds the 16-bit repeat 
count. 

Having as many things as possible in 
registers speeds up Sound considerably. 

The complete listing of Sound is 
shown in Listing I. Here's a short 
discussion of how it works. First, the 
repeat count is loaded into 'Y' from the 
parameter block (it's four bytes from 
the address in 'U'). This repeat count 
will be decremented down to zero 
through the program. When it reaches 
zero, the program has repeated the table 
values the number of times specified in 
the repeat count. Notice that this is a 
"Program Counter Relative" instruc- 
tion that does not specify an absolute 
address. This and other instructions in 
Sound are relocatable, meaning that the 



machine language code can be moved 
anywhere in memory without having to 
reassemble the program. 

Next, Register X is loaded with the 
delay count and Register U is loaded 
with the table address count from the 
parameter block. 

The code in DAC020 and the next 
instruction is the innermost loop in the 
program. Before this loop, a DAC value 
has been output by the STA SFF20 and 
the delay count has been loaded into 
Register D from Register X by the TFR 
X,D instruction. The SUBD decre- 
ments this count and the BNE instruc- 
tion causes a loop back to DAC020 
while the count in 'D' is not equal to 
zero. 

The code from DAC010 through five 
instructions from the end (BNE 
DAC010) is the next innermost loop. It 
makes a complete pass through the 
table of values, sending each value out 
to the DAC and delaying with the inner 
loop just discussed. The two LSLA 
instructions shift the data from the table 
to align it in the six high bits of 'A'. The 
table data is pointed to by 'U', which is 
used to load the data into 'A'. The LDA 
,U+ also increments the pointer value in 
'U' by one after the load is done. The 
CMPU BLK+2,PCR at the end of the 
loop continually compares the pointer 
value in 'U ' to the end of the table value 
at two bytes from the parameter block 
start. 

The outermost loop is from DAC005 
through the BNE DAC005. It repeats a 
pass through the table values for the 



number of times equal to the repeat 
count. The repeat count in 'Y' is decre- 
mented by the LEAY -1,Y each time a 
complete set of table values has been 
sent out. When this value has been 
decremented down to zero, the BNE 
DAC005 is not done, and the program 
returns to BASIC by the RTS. 

How to Use Sound 

You can assemble Sound yourself, or 
simply use the BASIC version shown in 
Listing 2. The BASIC version will ask 
you for the Table Start value. Table End 
value. Repeat Count, and Delay. From 
here on in you're on your own as to what 
you specify for these parameters, but 
here are some suggestions: 

To hear how your computer's mem- 
ory data sounds, specify a start of zero 
and an end of &HFFFF with a repeat 
count of 1. You should vary the delay 
to get higher or lower frequencies as 
well. 

Try the sine wave table at &HA85C 
through &H A87F to hear the sine wave 
used in the cassette output. (However, 
before you do. change Line 125 to read 
125 DATA &H12,S.H12,&HB7,&HFF to 
change the LSLA instructions to "no 
operations." The sine wave table data is 
already aligned to the left, ready to be 
sent out to the DAC.) Specifying differ- 
ent delay counts will create higher and 
lower frequencies and specifying repeat 
counts of other than '1' will sound the 
sine wave for longer periods of time. 

Try short sections of code repeated 
many times to create "real-world" 



Listing 1: Sound Program 


in Assembly Language 








3E00 






00100 




ORG 


$3E00 






3E00 






00110 


BLK 


RMB 


8 


PARAMETER BLOCK 




3E08 


10AE 


8C F8 


00120 


START 


LDY 


BLK+4.PCR 


GET REPEAT COUNT 




3E0C 


AE 


8C F7 


00130 




LDX 


BLK+6 , PCR 


GET DELAY COUNT 




3E0F 


EE 


8C EE 


00140 


DAC005 


LDU 


BLK , PCR 


GET TABLE POINTER 




3E12 


A6 


C0 


00150 DAC010 


LDA 


,u+ 


GET VALUE 




3E14 


48 




00160 




LSLA 




ALIGN TO 6 BITS LEFT 




3E15 


48 




00170 




LSLA 




BY TWO SHIFTS 




3E16 


B7 


FF20 


00180 




STA 


$FF20 


SEND TO DAC 




3E19 


IF 


10 


00190 




TFR 


X,D 


GET DELAY COUNT 




3E1B 


83 


0001 


00200 


DAC020 


SUBD 


#1 


DECREMENT BY ONE 




3E1E 


26 


FB 


00210 




BNE 


DAC020 


GO IF NOT DOWN TO 




3E20 


11A3 


8C DE 


00220 




CMPU 


BLK+2 , PCR 


TEST FOR END 




3E24 


23 


EC 


00230 




BLS 


DAC010 


GO IF NOT END OF TABLE 




3E26 


31 


3F 


00240 




LEAY 


-1,Y 


DECR REPEAT COUNT BY ONE 




3E28 


26 


E5 


00250 




BNE 


DAC005 


GO IF NOT DOWN TO 




3E2A 


39 


0000 


00260 
00270 




RTS 
END 




RETURN TO BASIC 




00000 TOTAL ERRORS 
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Price Changes 

Occur On A 

Daily Basis. 

Please Call 

1-800-343-8841 



PRICE BREAKTHROUGH 



Price Changes 

Occur On A 

Daily Basis. 

Please Call 

1-800-343-8841 



CO 



Super Sale on New Hard Drives 

MEGADISK™ 



1 S^" 



Winchester Hard Drive Ready to 

run on the TRS 80 Model I/III/IV/4P, 

Color Computer, I.B.M.-PC, TANDY 1000, 

Max/80. 

Software Drivers: LDOS, NEWDOS/80, 

DOSPLUS, OS9, TRSDOS 6.0, CP/M, COCODOS CALL FOR 

Fully Warranteed NEW LOW PRICES 
DRIVE A HARD BARGAIN ™ starting at $499^5 

Call Toll Free Ordering 1-800-343-8841 



High Quality Lowest Price 

Drive 0, 1, 2, 3 

for the 

Color Computer 

Starting at $199.95 



SOFTWARE SUPPORT, INC 

1 Edgell Road, Framingham, MA 01701 (617) 872-9090 Telex-3 83425 

Hours: Mori, thru Fri. 9:30 am 10 5:30 pm (E.S.T.) Sal. 10:00 am lo 3:30 pm 




DEALER INQUIRIES INVITED. 

TERMS: 

M.C./Visa/Amex and personal checks 

accepted at no extra charge. 

Shipping: Please call for amount. 

Not responsible for typographical errors. 

Prices subject to change. 



CANADA 

1720 CHARETTE STREET 

BUBERNAY, LAVAL, CANADA H7E4L9 

514-662-3224 



Service! Service! 

All in slock products are shipped within 24 hours 
of order. 

Repair/ Warranty service is performed within 24 
hours of receipt unless otherwise noted. We 
accept C.O.D., foreign and APO orders. School 
and D&B corporate PO.'s accepted. 



TRS/80 Registered Trademark Tandy Corp. Apple Registered Trademark Apple Computer Corp. 

IBM-PC Registered IBM Corp. Franklin Registered Trademark Franklin Corp. Max/80 Registered Trademark Lobo 

LDOS Reg. Logical System Inc. 



Dosplus — Micro Systems Software 



Newdos/80 — Apparat 



Prices Change 

Every Day. 

Please Call 

1-800-343-8841 

For Lower Prices. 



PRICE BREAKTHROUGH 



1)1 All R INQUIRIES INVITED 



Prices Change 

Every Day. 

Please Call 

1-800-343-8841 

For Lower Prices. 



MEGAD1SKTM HARD DISK DRIVE SYSTEMS TOLL FREE ORDERING 1-800-343-8841 

For (he / ,BM/PC - ' ftnd V 100 °- TRS/80 Models I/III/IV/4P, Compaq, Tava, PC Workalikes, Color Computers, Heath/Zenith, Max/80 

v Complete with Hardware, Cables, Software and Quikfit Installation 

5 Megabytes Internal Mount IBM/PC El rv« starling at 

10 Megabytes Internal Mount IBM/Tandy 1000 ^ • - "Hi CPt\ "VJV starting at 

20 Megabytes Internal Mount IBM/Tandy 1000 Tf\- ■ A f^^U-- f-fj/Y i - ■ starting at 

5 Megabytes External System .. .V.>* OVpDTfA^ *-Q VU starting at 

10 Megabytes External System S.fl ,|. f^yE".^ fv . 9 starting m 

20 Megabytes External System t? V^AV L / starting at 

Tape Backup System — Internal Or External (IBM/PC) TT.Tt starting at 

nns wi« mc iwiiaht.- / IBM/Heath — DOS, 1.0, 2.0, 2.1, 3.0, or later 

uus systems Avsuawe. ^ TRS / 80 . LDOS| TRSDOS 6.x, Newdos/80, Dosplus, CP/M, COCO DOS, Max/80 LDOS, OS9 

FULLY WARRANTIED — PARTS AND LABOR — 24 HOUR SERVICE — CALL TOLL FREE — 1-800-343 



24JX5 

51*?5 
49*35 
74J>#5 
8<J»#5 
4*9^5 



-8841 



FLOPPY DISK DRIVES, POWER SUPPLIES AND CABINETS 

Our Disk Drives are UL approved — Our Floppy Drive Cabinets and Power S 
are Underwriters Laboratory Listed and have passed the required Federal 
Communications Pan 15 Section B-EM1/RFI tests. 

Wiirn.nl) on all disk drives Is one full year parts and labor. Warranty on flopp 
drive power supplies Is five (5) >ears. In warrant) or out of warranty service Is 
lura*B*round on all disk drives and power supplies. 

Full Heigbl — Tandon 


pplies 

1 disk 
24 hour 

S 99.95 

239.95 

109.95 

. 149.95 

259.95 

. 79.95 
. 119.95 
209.95 
109.05 
149.95 
259.95 

■ 129.95 

236.95 
at 42.00 




















Half High Drives — landon/TEAC 


















Apple/ franklin Disk Drives 












Power Supplies and Cabinets 5 '<•'* " and Hard Drive Systems 


starting 



.".""."» MEGADISK SPECIAL *«««««" 
With a 10 megabyte system, you can purchase a complete IBM or 
PC compatible host, adapter, software and cable for only S1S.00!! 
P.S. Ask about the MEGAPLEXER. 



IBM - PC/XT WORKALIKE 

All of our computers have: 8 slot motherboard. 640K. monochrome adapter, parallel 
primer port, 130 wall power supplv. free softwure. monitor, serial port, clock calendar 
— all with our full warrant). 

/PC- 2 Floppy Drives ■ Monochrome Monitor, MS-DOS $1,299.00 

5mcg/XTlra • 1 Floppy Drive - Monochrome Monitor, MS-DOS $1,599.00 

lOmeg/XTtra - I Floppy Drive - Monochrome Monitor, MS-DOS 1.799.00 

20mcg/XTtra - I Floppy Drive - Monochrome Monitor, MS-DOS 1.995.00 

Internal Tape Backup For Any Of Above systems Add S449.95 

Color for above systems 500.00 



COLOR COMF1 TER DISK DRIVK SV5TEMS AMI ADD IN PRODI t tS 
40 Track Single Head Drive with Case, Power Supply, Cable 

Controller. Instruction Booklet. Diskettes $219.95 

Above with Dual Drives in One Cabinet 
40 Track Dual Head with Case. Power Suppl>. Cable. 

Controller. Instruction Booklet. Diskettes 259.95 

Above with Dual Drives in One Cabinet .119,95 

Dual DOS Switch ,....., 29.95 

With Second DOS System - JDOS, RSDOS. and Booklet W>5 



PRINTERS 

Dot Matrix 

Citizen $ Call 

Star Micronics — S.C. Scries starting at S259.95 

Panasonic 1090 249.95 

Daisy Wheel 

Silver Reed 440 80 Column 12 CPS 315.95 

550 132 Column 19 CPS 439.95 

770 132 Column 36 CPS 895.00 

Olympia 132 Column 14 CPS with Form and Tractor Feed 399.9! 

Apple/Franklin Printer Interface w/Graphics and Cable 84.95 

Printer Cables starting at 19.95 

Printer Paper — Micropcrf Edge 1000 Sheet! 16.95 



MODEMS 

Mark XII I200/3O0 Baud Autodial 


SI99.95 

299.95 





ELECTRICAL 

Surge Protectors — Line Fillers — SL Waber — 6 Outlets with Switch S 39 9! 

Uninterruptable Power Supplies 399.95 



ALL IN-STOCK ITEMS SHIPPED WITHIN 24 HOURS. SAME DAY SHIPPING 
PROVIDED BY REQUEST WITHOUT ANY EXTRA HANDLING CHARGES. 



MISCELLANEOUS 
























Floppy Disk Drive Cables 






2 Drives 


18.95 




Heath 'Zenith 2 Drive Cables — Shielded 


. 24.95 
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SOFTWARE SUPPORT, INC 



1 



Edgell Road, Framingham, MA 01701 (617) 872-9090 Telex-383425 

Hours: Mon. thru Fri. 9:30 am 10 5:30 pm (E.S.T.) Sat. 10 am lo 3:30 pm 

SERVICE POLICY — Our Professional Technical Staff Is Available To Assist You Monday Through Saturday. 

WARRANTIES — Up To One Full Year Parts And Labor. Floppy Disk Drive Power Supplies — Five (5) Years. 

SERVICE — 24 Hour Turn-A-Round On All In-Stock Parts. Dealer Inquiries Invited. Call 617-872-9090 

Please Call For Shipping, lb!, f^fe 1-800-343-8841 ^SSZSSOSTSS^ 
Handling And Insurance. Please Call For Our Latest Price Saving Specials. w iihoui Nmice. 



Listing 2: SOUND 



90 i ************************** 

91 '*SOUND PROGRAM EXERCISER * 

92 ^RELOCATES AND CALLS AL * 

93 ' *SOUND PROGRAM. * 

94 " ************************** 

10J2 CLEAR 4^,&H3DFF 

ll^i DEFUSRj3=&H3Ej38 

12j3 DATA &H0J3 , &H0j3 , &H0J3 , &H0J3 

121 DATA &Hj3j3 , &H0J3 , &H0J3 , &H0j3 

122 DATA &H1^,&HAE,&H8C,&HF8 

123 DATA &HAE,&H8C,&HF7,&HEE 

124 DATA &H8C,&HEE,&HA6,&HCj3 

125 DATA &H48,&H48,&HB7,&HFF 

126 DATA &H2j3,&HlF,&Hip,&H83 

127 DATA &Hj3j3,&Hj31,&H2 6,&HFB 
12 8 DATA &H11,&HA3,&H8C,&HDE 

129 DATA &H2 3,&HEC ; &H31,&H3F 

130 DATA &H26,&HE5,&H39 
140 FOR I=&H3Ej3j3 TO &H3E2A 
150 READ ML 

160 POKE I, ML 
170 NEXT I 



180 POKE &HFF01,PEEK(&HFF01) AND 

&HF7 
190 POKE &HFF03,PEEK(&HFF03) AND 

&HF7 
200 POKE &HFF2 3,PEEK(&HFF2 3) OR8 
210 INPUT "TABLE START" ;TS 
220 INPUT "TABLE END";TE 
2 30 INPUT "REPEAT CNT";RC 
240 INPUT "DELAY CNT";DC 
250 POKE &H3E00,INT(TS/256) 
260 POKE &H3E01,TS-INT(TS/256) * 

256 
270 POKE 

2 80 POKE 

256 
290 POKE 
300 POKE 

256 
310 POKE 

3 20 POKE 

256 
330 A=USR0(0) 
3 40 GOTO 210 



&H3E02,INT(TE/256) 
&H3E03 , TE-INT (TE/256) * 

&H3E04,INT(RC/256) 
&H3E05,RC-INT(RC/256) * 

&H3E06, INT (DC/256) 
&H3E07, DC-INT (DC/256)* 



7/W Av*tta6lt fo <fou fyuxm- 

HARDWARE HANDSHAKING AND HIGH SPEED CMOS 

TO REDUCE BUSS LOADING 

COMPATIBLE WITH ALL KNOWN BUS EXTENDERS 

ALSO AVAILABLE FROM OWL-WARE 

Suftvt 'So<vict 

2 INTERRUPT DRIVEN SERIAL PORTS 

CENTRONICS PARALLEL PORT 

REAL TIME CLOCK WITH ALARM 

COMPLETE WITH SOFTWARE 

ALLFOHS220.00 

HARD DISK INTERFACE 

USED WITH: XEBEC/WESTERN DIGITAL 

DISK CONTROLLER BOARDS 

INCLUDES OS9 SOURCE CODE 

ALL FOR $98.00 

COMPLETE HARD DISK SYSTEMS 

5 MEG. . .$495.00 10 MEG. . .$695.00 

PROGRAMS: 2716 THRU 27256 • 68764 • 68766 • 2516 • 2564 
NO SWITCHES OR BATTERIES 
ALL CONTROL VIA SOFTWARE 
FITS IN SLOT #1 OF MULTI-PAK 

INCLUDING SOFTWARE $120.00 

MULTI-PAK IS A TRADEMARK OF TANDY 
OS9 IS A TRADEMARK OF MICROWARE 

THESE UNITS HAVE BEEN IN USE IN INDUSTRY 

ALL CONNECTORS ARE GOLD PLATED 
FOR FURTHER INFORMATION CALL OR WRITE 

4 « flL./ 2010 Grey Horse Dr., Warrington, PA 18976 
X, /S ItCK Phone:(215)343-0423 

Visa & MC occopioa, odd 3% lor Snipping; Pa residents add 6% 



The Last Word 

for OS-9 T " 

The ultimate in word processing 

power and convenience. 

• Pop-down menus accessible from 
mouse, joystick or keyboard. 

• Open files by just pointing to names from 
a directory menu. 

• Fast on-screen formatting. 

• 22,000 word on-line dictionary. 

• Use with WORD-PAK or it's own hires 
screen. 

• Move freely in files of any size, (even 
bottom to top). 

• Many other features. 



Unified Software 
525 S. Chestnut 
Cameron, MO 64429 
(816) 632-7892 




$49.95 

+$3.00 S/H 



OS-9 is a trademark of Microware and Motorola. 
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noises like car crashes, phaser blasts, 
and the like. 

Constructing Your Own Sound Tables 

Just as the sine wave table provides 



a sine wave sound output, you can 
construct your own tables of sounds. 
There's plenty of room to do this in the 
area beyond the end of the program at 
&H3E2B through &H3FFF. POKE the 



64 



"Backwards 
Bell" 




Typical Values 
0,22,0,23,0,26. . . 



64 



Triplet 



Values Here Are 
0,0,0,0 



Typical Values 
0,63,0,63,0,63. . . 



About 100 
Values 



ADSR 



Values Here Are 60,60,60 




Typical Values 
0,38,0,37,0,36. . . 



V 

About 100 
Values 



Figure 10: Sound Table Shapes 



values by DATA statements and READ 
loops just as in moving the machine 
language code. Some suggestions with 
parameters are shown in Figure 10. 

By using many tables of sounds, you 
can create an entire set of sounds to use 
for synthesized music, games and other 
functions. Remember that the Sound 
table location can be changed at will by 
POKEing the proper addresses into the 
S3E00 parameter block. The BASIC 
program shown above is really only a 
guide to how to interface to Sound — 
it should be easy for you to incorporate 
Sound into your own BASIC code. 

Sound Contest 

1 would be very interested in the 
results you obtain with this program 
and I'd like to hear about unique areas 
of memory that yield good sound ef- 
fects, or tables of sounds you've created. 
As a matter of fact, let's make it a 
contest! Entries can use the sound 
program here or your own version of a 
sound driver. Send your best sound 
effect, ready to be run with a LDADIV 
EXEC (or CLOADfl/EXEC). The winner of 
the most unique sound will be awarded 
a copy of my Howard W. Sams book 
TRS-80 Model I, II, and Color Com- 
puter Interfacing Projects (which, by 
the way, describes more sound projects) 
and a one year's subscription to RAIN- 
BOW. The winner and runner-up entries 
will be featured in this column. Send 
entries to me at P. O. Box 3568, Mission 
Viejo, CA 92692. (I can also be con- 
tacted in the CoCo SIG on Delphi. 
Username is BILLBARDEN.) The con- 
test deadline will be the last day of the 
month in which this column appears in 
THE RAINBOW. 

Til I see you here next month with 
more assembly language topics, keep 
assembling /K\ 



OS-9 SOFTWARE/HARDWARE 



SDISK— Standard disk driver module allows the use of 35, 40, 

or 80 track double sided drives with COCO OS-9 plus you can 

read/write/format the OS-9 formats used by other OS-9 systems. 

S29.95 

SDISK + BOOTFIX— As above plus boot directly from a double 

sided diskette $35.95 

FILTER KIT #1— Eleven "wild card" utilities plus disk sector edit 

program. $29.95 

FILTER KIT #2— Macgen + 10 others. $29.95 

HACKER'S KIT #1 — Disassembler-!- others. $24.95 

PC-XFER UTILITIES —Utilities to read/write and format ss 

MS-DOS' M diskettes on CoCo under OS-9. $45.00 (requires SDISK) 

SKIO— hi res screen driver for 24 x 51 display; does key click, 

auto repeat, boldface, italics; supports upgraded keyboards and 

mouse. With screen dump and other useful programs. $29.95 



CCRD 512K Byte RAM DISK CARTRIDGE— Requires RS Multi- 
pak interface, used with driver software below provides 1/2 MB 
OS-9 RAM disk. $259.00 (Prices subject to change). 

CCRDV OS-9 Driver software tor CCRD— $20.00 



All disk prices are for CoCo OS-9 format; for other formats, 
specify and add $2.00 each. Order prepaid or COD, VISA/MC 
accepted, add $1.50 S&H for software, $5.00 for CCRD; actual 
charges added for COD. 

D.P. Johnson, 7655 S.W. Cedarcrest St. 
Portland, OR 97223 (503) 244-8152 

(For best service call between 9-11 AM Pacific Time.) 

OS>9> Is a trademark ol Mlcroware and Motorola Inc 
MS-DOS Is a trademark ol Microsott, Inc. 
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THESE FINE STORES 
CARRY THE RAINBOW 

The retail stores listed below carry the rainbow on a regular basis and may 
have other products of interest to Tandy Color Computer users. We suggest you 
patronize those in your area. 



ALABAMA 

Birmingham 

Brewton 

Florence 

Huntsvllle 

Madison 

Montgomery 

ALASKA 

Fairbanks 

ARIZONA 

Phoenix 



Scottsaole 
Tempe 

Tucson 

ARKANSAS 

Fayetlevllle 
Little Rock 

CALIFORNIA 
Chula Vista 
Citrus Heights 
Downey 
El Cajon 
Exton 

Grass Valley 
Halt Moon Bay 
Hesperla 
HollywooC 
Lompoc 
Los Angeles 

National City 

Pacitlc Beach 
Palo Alto 
Sacramento 
San Diego 



Santa Rosa 
Southgote 
Sunnyvale 

COLORADO 

Aurora 
Colorado 

Springs 
Grand 

Junction 

Montrose 
Westminster 

CONNECTICUT 

Danbury 

DELAWARE 

Middletown 

Mlltord 

Wilmington 

FLORIDA 
Boca Raton 
Clearwater 
Cocoa 

Davie 

Ft. Lauderdale 

Jacksonville 



Jefferson News Co. 
McDowell Electronics 
Anderson News Co. 
Endicott Software 
Madison Books 
Trade 'N' Books 

Electronic World 

The Computer Shop 
Gemini Computers 
TRI-TEK Computers 
Data Concepts 
Books Etc. 
Computer Library 
Anderson News Co 
Mlnz Electronics 

Vaughn Electronics/Radio Shack 
Anderson News Co. 

R & R Software 
Software Plus 
The Floppl Disk 
Radio Shack 
Software City 
Advance Radio. Inc. 
Strawtlower Electronics 
Dessert Sound, Inc. 
Levity Distributors 
L&H Electronics Emporium 
E.D.C. Industries 
Polygon Co. 
JARB Software 
Willy's Electronics 
Pro Am Electronics 
Printers. Inc. 
Tower Magazine 
The Computer Store 
Dimensional Software 
Disney's Electronics 
Radio Shack 
Sawyer's News. Inc. 
Color Computing 
Computer Literacy 

Aurora Newsland 

Halhaway's Magazines 

Colorado Periodical 
Distributing Co. 
Montrose Mini Mall 
Software City 



Melbourne 

Miami 

North Miami 

Beach 
Orlando 
Panama City 
Pensacola 
Pinellas Park 
Sarasota 



Computer Serv. of Danbury 

Delmar Co. 

Mlltord News Stand 

Normar, Inc.— The Smoke Shop 

Software. Software. Inc. 
Soenen & Wllmoth Books 
The Open Door 
Software Plus More 
Electronics Engineers 
Mike's Electronics Distributor 
Bill's CoCo Comer 
The Book Nook 
Book Town 
City Newsstand 
The Little Store 
The News Rack 
Newsstand of Cutler Ridge 

Almar Bookstore 
Book Mania 
Boyd-Ebert Corp. 
Anderson News Co. 
Wolf's Newsstand 
Family Computers 



South 




Pasadena 


Poling Place 


Stuart 


Cotronlcs, Inc. 


Sunrise 


Sunny's at Sunset. Inc. 


Tallahassee 


Anderson News Co. 


Tampa 


Fine Print Bookstore 




Sound Trader & Computer Center 


Tllusville 


Computrac 


GEORGIA 




Bremen 


Boogie Shoppe 


Columbus 


Muscogee News Co, 


Cummlngs 


Kent Radio Shack 


Jesup 


Kannon Music 




Radto Shack 


Marietta 


Act One video 


St. Simons 




Island 


Radio Shock 


Toccoo 


Martin Music Radio Shack 


IDAHO 




Blackfoot 


F/M Systems Electronics 


Moscow 


Johnson News Agency 


ILLINOIS 




Aurora 


Kroch's & Brentano's 


Belleville 


Software or Systems 


Champaign 


Book Market 


Chicago 


B. Dalton Booksellefs 




N. Walbosh St. 




West Jackson St. 




Bob's in Newtown 




Bob's News Emporium 




Bob's Rogers Pork 




Book Market 




East Cedar 




North Cicero 




West Dlversey 




E.B. Garcia & Associates 




Guild Books & Periodicals 




Kroch's & Brentano's 




South Walbash 




West Jackson 




516 N.Michigan 




B35 N. Michigan 




Parkway Drugs 




Parkwest Books 




Sandmeyers Bookstore 




Univ. of Chicago Bookstore 




Univ. of Illinois Bookstore 




Vldeomat, Inc, 


Chllllcothe 


Book Emporium 


Danville 


Book Market 


Decatur 


Book Emporium 




K-Mart Plaza 




Northgate Mall 


DeKalb 


Appletree Computers 


East Mollne 


Book Emporium 


Evanston 


Chicago-Main News 


Geneseo 


B8cJSupply 


Kewanee 


Book Emporium 


Lisle 


Book Nook 


Metropolis 


Jim's Home Center 


Newton 


Bill's TV Radio Shack 


Oak Brook 


Kroch's & Brentano's 


Oak Park 


Kroch's & Brentano's 


Paris 


Book Emporium 


Peoria 


Book Emporium 




Sheridan Village 




Westlake Shopping Center 




Book Market 




Illinois News Service 


Schaumberg 


Kroch's & Brentano's 


Skokie 


Kroch's & Brentano's 


Springfield 


Book Emporium 




Sangamon Center North 




Town & Country Shopping Ctr. 


Sunnyland 


Book Emporium 


West Frankfort 


Paper Place 


Wheeling 


North Shore Distributors 


INDIANA 




Berne 


White Cottage Electronics 


Columbus 


Micro Computer Systems. Inc 


Gairett 


Finn News Agency, Inc. 


Greenwood 


The Computer Experience 


Highland 


Computet Health Consultants 


Indianapolis 


Bookland, Inc. 




Indiana News 



Jasper 


Elex Mart 


Madison 


Arcs Office Supplies 


Martinsville 


Radio Shack 


Walbash 


Mining's Electronics 


IOWA 




Bettendort 


Cosmos Computers 


KANSAS 




Junction City 


III H's Stereo 


Topeka 


Palmer News. Inc. 




Town Crier of Topeka. Inc. 


Wichita 


Amateur Radio Equipment Co. 




Lloyd's Radio 


KENTUCKY 




Danville 


Boyle Electronics 


Georgetown 


Goodwin Electronics 


Hopkinsvllie 


Hobby Shop 


Louisville 


The Computer Store 


Paducah 


Radio Shack 


Paintsville 


Gus-Stan Enterprises 


Pikeville 


Gus-Stan Enterprises 


Princeton 


Miller Electronics 


LOUISIANA 




Baton Rouge 


Acme Book Co. 


Crowley 


Acadiana Newsstand 


Gretna 


Computer Supply Store 


MAINE 




Brockton 


Voyager Bookstore 


Waterboro 


Radio Shack 


MARYLAND 




Silver Spring 


Layhlll Newsstand 


MASSACHUSETTS 




Brockton 


Vogager Bookstore 


Cambridge 


Ninls Corner. Inc. 




Out Of Town News 


Fltchburg 


Corners Book Shop 


Ipswich 


Ipswich News 


Littleton 


Computet Plus 


Lynn 


North Shore News Co. 


Quincy 


Soft Ware House 


Rehaboth 


Arel Computer & Electronics 


MICHIGAN 




Allen Park 


Book Nook. Inc. 


Ann Arbor 


Community News Center 


Brooklyn 


Weatheiwax Radio Shack 


Dearborn 


DSL Computer Products 


Durand 


Robblns Electronics 


Flint 


"I O" 


Greenville 


Robbins Electronics 


Harrison 


Harrison Radio Shack 


Kalamazoo 


John Rollins 


Lowell 


Curl's Sound & Home Arcade Center 


Mt. Clemens 


Key Book Shop 




Michigan Radio 


Muskegon 


The Eight Bit Corner 


Owosso 


C/C Computer Systems 


Perry 


Perry Computers 




Perry Oil 6t Gas 


Petoskey 


B & L Sound, Inc. 


Pontiac 


Computer Shack 


Rosevllle 


New Horizons 


Royal Ook 


Software City 


St. Johns 


Clinton Electronics 


Southfleld 


Software City 


Sterling 




Heights 


Sterling Book Center 


Tecumseh 


White Electronics 


Wyoming 


Gerry's Book Co. 


MINNESOTA 




Minneapolis 


Read-More News 


Willmar 


The Photo Shop 


MISSISSIPPI 




Grenada 


Stereo Store of Grenada, Inc. 


Starkvllle 


Stonehenge Computer Software Cen 


MISSOURI 




Farmlngton 


Ray's TV & Radio Shack 


Kirksville 


T&R Electronics 


Moberly 


Audio Hut 


St. Louis 


Book Emporium 




Computer Xchange 




Sottwaire Centre 




Software Center 
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University City 


Final Edition 


MONTANA 




Whltefish 


The Computer Corral 


NEBRASKA 




Lincoln 


Hobby Town 


Omaha 


Computers 4 Components 


NEVADA 




Battle 




Mountain 


Stewart's Radio Shack 


Las Vegas 


Hurley Electronics 


NEW HAMPSHIRE 




Peterborough 


BRW Electtonlcs/RaOlo Shack 


Portsmouth 


Portsmouth Computers 


West Lebanon 


Verham News Corp. 


NEW JERSEY 




Cedar Knolls 


Village Computer 8c Software 


Cherry Hill 


Software City 


Clinton 


Micro World II 


Lawrencevlile 


Micro Con Software Center 


Linwood 


Software City 


Marmora 


Outpost Radio Snack 


Montvale 


Software City 


Pennsvllle 


Dave's Elect. Radio Shock 


River Edge 


Software City 


Rockaway 


Software Station 


Summit 


Software City 


Villas 


Art's Electronics 


NEW MEXICO 




Alamogorao 


New Horizons Computer Systems 


Albuquerque 


East-West Enterprises 




Page One Newsstand 




Salt of the Earth 


NEW YORK 




Brockporl 


Utt Bridge Book Shop. Inc. 


Brooklyn 


Micro Configurations. Inc. 


Elmlra Heights 


Southern Tier News Co., Inc. 


Falrporl 


Software City 


Fredonla 


On Line: Computer Access Center 


Hudson Falls 


GA West & Co. 


Johnson City 


Unicom Electronics 


Mt. Kisco 


Software City 


New York 


Bames & Noble— Sales Annex 




Coliseum Books 




Eastern Newsstand 




Grand Central Station. Track 37 




200 Park Ave, (Pan Am #1 ) 




55 Water Street 




World Trade Center *2 




First Stop News 




Idle Hours Bookstore 




International Smoke Shop 




Jonll Smoke 




Penn Book 




State News 




Usercom Systems. Inc. 




Walden Books 




World Wide Media Services 


N. White Plains 


Software City 


Plattsburg 


Adirondack Computer Supplies 


Rochester 


Village Green 




World Wide News 


Wcodhaven 


Spectrum Projects 



NORTH CAROLINA 

Aberdeen 



Cary 
Charlotte 

Havlock 
Hickory 
Marlon 

NORTH DAKOTA 

Fargo 

OHIO 

Blanchester 

Canton 

Cincinnati 

Coshocton 

Dayton 

Falrbotn 

Kent 

Kenton 

Lakewood 

Lima 

Mayfield 
Heights 
Mlamlsburg 
Mount Orob 
Rocky River 
Toledo 
Xenia 

OKLAHOMA 

Hobart 
Oklahoma 

City 
Tulsa 

OREGON 

Portland 



King Electronics 

Radio Shock 

News Center In Cary Village 

Newsstand Inf I 

Papers & Paperback 

Computer Concerns 

C 1 Books & Comics 

Boomers Rhythm Center 

Computer Associates 

JR Computer Control 

Little Professor Book Center 

Clnsoft 

Utopia Software 

Wllke News 

News-Readers 

The News Shop 

T.W. Hogan 8; Associates 

Lakewood International News 

Brunner News Agency 

Edu-Caterers 

Software City 

Wllke News 

Mount Orab Radio Shack 

Programs Unlimited 

Leo's Book & Wine Shop 

Fin Print Books 

Shortgrass Electronics 

Merit Micro Software 
Steve's Book Store 

Fifth Ave. News 



PENNSYLVANIA 




Allison Park 


Software City 


Altoono 


Newborn Enterprises 


Brookville 


Larry's Stereo Shop 


Horrisburg 


Harrlsburg News Co. 


Malvern 


Personal Software 


Philadelphia 


City Software Center 




Newsy 


Phoenlxvllle 


Stevens Radio Shack 


Pittsburgh 


All-Pro Souvenlers 


Pleasant Hills 


Pitt Computer & Software 


Shlppensburg 


Rainbow Adventure 


Temple 


Software Comer 


Tunkhannock 


The Donna Comm. Co, 


Wind Gap 


Micro World 


York 


The Computer Center of York 


RHODE ISLAND 




Warwick 


Software Connection 


SOUTH CAROLINA 


Charleston Hts 


Software Haus. Inc. 


Greenville 


Palmetto News Co. 


union Head 


Megatron Corporation 


Spartanburg 


Software City 


Union 


Fleming's Electronics 


TENNESSEE 




Chattanooga 


Anderson News Co 


Dickson 


Highland Electronics 


Knoxvllle 


Anderson News Co. 




First Byte Computer Co. 


Memphis 


Computer Center 




Software, Inc. 


Nashville 


Mosko's Book Store 


Smyrna 


Delker Electronics 


TEXAS 




Bay City 


Impulse Computers 


Elgin 


The Homing Pigeon 


Ft. Worth 


Software Terminal 


Houston 


MicroSolutions 


Orange 


Northway Books & News 


Paris 


Software Solutions 


San Antonio 


CoCo Nuts 


UTAH 




Murray 


Deseret Book 


VIRGINIA 




Gallon 


Electronics Marketing 


Norfolk 


l-O Computers 


Richmond 


Software City 


WASHINGTON 




Mount Lake 




Terrace 


Emerald Computer Services 


Newport 


Nantronlcs 


Ronton 


Data Borne 


Seattle 


Adams News Co.. Inc. 


Tacoma 


B & 1 Magazines & Books 




Nybbles 'N Bytes 


WEST VIRGINIA 




Huntington 


Nick's News 


Logan 


Stan's Electronics & Radio Shack 


Madison 


Communications, LTD 


Parkersburg 


Valley News Service 


WISCONSIN 




Appleton 


Badger Periodicals 


Cudahy 


Cudahy News & Hobby 


Ladysmith 


Electronics. Etc. 


Milwaukee 


Book Tree 



Booked Solid 

Booked Solid II 

Harvey Schwartz Bookshop 

Univ. of Wisconsin Bookshop 

WYOMING 

Casper The Computer Store 

Worland Price Electronics 



ARGENTINA 

Cordoba Informatica Y Telecomunlcaclones 

AUSTRALIA: 
SYDNEY 

Kingsford Parts Radio Electronics 

CANADA: 
ALBERTA 

Athabasca McLeans Ltd. 

Banff Banff Radio Shack 

Barrhead Barrhead Sound 1982 Ltd. 

Blalrmore L & K Sports & Music 

Brooks Double "D" AS.C. Radio Snack 



Calgary 


Billy's News 




Imperial Computer Ltd. 




Rainbow Software Services 


Camrose 


Radio Shock Associated Stores 


Claresholm 


Radto Shack Associated Stores 


Coaldole 


Coaldale Sight & Sound 


Drayton Valley 


Langord Electronics 


Edmonton 


CMD Micro 




Kelly Software Distributors 


Edson 


Radio Shack 


Falrvlew 


D.N.R. Furniture & TV 


Fox Creek 


Fox City Color & Sound 


Ft, Macleod 


Fort Pharmacy 




Radio Shack 


Grande 




Cache 


The Stereo Hut 


Grande 




Centre 


Jhe Book Nook 


Grande Prairie 


Northern Computer Service 


Hanna 


Technics TV Ltd. 


Innlsfall 


L&S Stereo 


Lacombe 


Tall Pine TV 


Leduc 


Radio Shack Associated Stores 


Lloydminstet 


Lloyd Radio Shack 


Peace River 


H & S Music Centre 




Radio Shack Associated Stores 


Plncher Creek 


Thornton & Son's 


Redcllff 


Gale Distributing 


Red Deer 


Computer World 


Rimbey 


Roys TV 


St. Paul 


Tele-Logic 


Sundre 


Sundre Sound 


Taber 


Pynewood Sight & Sound 


Valleyvlew 


Don's Radio Shop 


Vermilion 


Photocraft Vermilion Ltd. 


Wetasklwin 


Radio Shack 


BRITISH COLUMBIA 


Burnaby 


Compullt 


Campbell 




River 


TRS Electronics 


Chllllwack 


Charles Parker 


Dawson Creek 


Bell Radlo& TV 


Ladysmith 


Ladysmith Sound Center 


Merrit 


Merrit Radio Shack 


N. Vancouver 


Microwest Distributors 


Salmon Arm 


Matrix Computing 


Sicamous 


Shuswap Electronics 


Sidney 


Sidney Electronics 


Williams Lake 


Norcom Software 



MANITOBA 

The Pas Jodl's Sight & Sound 

Winnipeg J & J Electronics Ltd. 

NEW BRUNSWICK 

Moncton Jeffries Enterprises 

NEWFOUNDLAND 

Labrador City Sound & Vision 

NOVA SCOTIA 

Dartmouth Sector Software 

Halifax Atlantic News 



ONTARIO 




Angus 


Micro Computer Service 


Atlkokam 


Gill's Furniture 


Bowmanville 


Bowmanville Audio Vision LTD 




Smoke Shop 


Cochrane 


Frederlckhouse Sound 


Concord 


Avlva Software 


Etoblcoke 


NEPCOM 


Hamilton 


Dataman 


Kingston 


T.M. Computers 


Ottawa 


National News Co,, Ltd. 


St. Catherine 


Smoke Shop-2 Stores 


South River 


Max TV 


Strathroy 


Downtown Sound 


OUEBEC 




LoSalle 


Messageries de Presse Benjamin Enr. 


Sherbrooke 


Sec. De Loc 


SASKATCHEWAN 




Asslniboia 


Telstar News 


Nlplwan 


Cornerstone Sound 


Regina 


Regina CoCo Club 




Software Supermarket 


Saskatoon 


Computertlrne 


Tlsdale 


Paul's Service 


YUKON 




Whitehorse 


Big Byte Computer Services 



H S< O Holdings 

PUERTO RICO 

San Juan Software City 



Also available at all Coles Bookstores, B. Dalton Bookseller and 
Waldenbooks stores in the United States and Canada. 
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A D VER TISER 5 INDEX 

We encourage you to patronize our advertisers — all of whom support the 
Tandy Color Computer. We will appreciate your mentioning THE rainbow when 
you contact these firms. 



Ark Royal Games 217 

B5 Software 220 

Celmark Corporation 165 

Cer-Comp 212, 213 

Challenger 80 

Cinsoft 74 

CNR Engineering 228 

CoCo Warehouse 42 

Cognitec 13 

Colorware 169, 170, 171, 172 

Computer Center 35 

Computer Friends 225 

Computer Island 136, 137 

Computer Plus 3 

Computerware 99, 245, 247 

Computize, Inc 218, 257 

Cosmos Computer Services Inc 140 

Cost Plus Electronics 233 

Custom Computer Products 16 

Dayton Associates of 

W. R. Hall, Inc 178 

Delphi 242, 243 

Derringer Software 86, 87 

Didaktek 51 

Diecom 143 

Disto IBC 

Dorsett Educational Systems 193 

Dragon User 155 

DYNACALC 93 

Dynamic Electronics, Inc 91 

E.D.C. Industries 223 

Eli Heffron 189 

Elite Software 45, 46, 47 

Federal Hill Software 78 

Four Star Software 121 



H.D.R. Software 188 

Hard Drive Specialists IFC 

Hawkes Research Services 196 

Hazelwood Computer 200 

HJL div. of Touchstone 

Technology, Inc 130 

Frank Hogg Laboratory . . .227, 229, 231 

Homesoft 72, 202 

Howard Medical 33, 34, 258 

Incentive Software 89 

Inovative Systems 103 

J & M Systems BC 

J & R Electronics 138 

Johnson, D.P 253 

JTJ Enterprises 73 

Kelly Software Distributors 197 

LRTech 252 

Mark Data Products 37, 182, 183 

Metric Industries 156 

MichTron 38, 224 

Micro Data Systems 73 

Micro Works, The 232 

Microcom Software 17 

Microtech Consultants Inc 94 

Mix, Tom Software 118, 119 

Moreton Bay 146 

Novasoft 162 

Other Guys Software, The 65 

Owls Nest Software 43 

Owl-Ware 82, 83 

PCM 100 

PD Software 230 

Perry Computers 97 

Polygon Co 70 

Dr. Preble's Programs 124 

Prickly-Pear Software 144 



PXE Computing 1! 

Radio Shack 9, 11, 186, 18: 

Rainbow Adventure Book 4' 

Rainbow Binder 24 

Rainbow Bookshelf 22 

RAINBOWfest 234, 23! 

Rainbow Gift Subscription 19' 

Rainbow Guide to OS-9 5: 

Rainbow On Tape 131 

REM Industries 2 

Roberson, S.D 20: 

Robotic Microsystems 16i 

Saguaro Software 7: 

Selected Software 19; 

Software House, The 14; 

Software Support, Inc 250, 25 

Spectrosystems 23' 

Spectrum Projects Inc. ... 105, 106, 107 
110, 111, 113 

Speech Systems 54-6 

Sugar Software 204, 20 

Sunrise Software 20 

T & D Software 14 

TCE Programs, Inc 1 

Tepco 23 

Tothian Software Inc 10 

True Data Products 150, 15 

Unified Software 25 

VCR 17 

Wasatch ware 6 

White House Computer 22 

Woodstown Electronics 6 

Workbase Data Systems 16 

YGS 19 

Zebra Systems, Inc 20 



ES3 Call: 

Cindy Shackleford 
Director, West Coast Office 
Shirley Duranseau 
Advertising Representative 
12110 Meridian South, Suite 5 
P.O. Box 73-578 
Puyallup, WA 98373-0578 

(206) 848-7766 




Call: 

Kim Vincent 

Advertising Representative 

The Falsofl Building 

9509 U.S. Highway 42 

P.O. Box 385 

Prospect, KY 40059 

(502) 228-4492 



I Call: 

Jack Garland 
Garland Associates, Inc. 
10 Industrial Parle Road 
Hingham, MA 02043 

(617) 749-5852 
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1 1 ARE YOU LOOKING F0 * a """* GMPH,C 




THE ULTIMATE PRINTER UTILITY 




©1984 V# MIT ESI11I TH IMl.fl 

ALL RIGHTS RESERVED 

IARDCOPY PRINT UTILITY $29.95 



1 SCREEN PRINT DUMP? 

HARDCOPY ■ Hardcopy is more than just a screen print dump, compare these features with any 
other graphic dump program on the market: 

• Full GRAPHICOM/GRAPHICOM PART II compatibility! Loads STANDARD 6K images, 
GRAPHICOM pictures, and COCO MAX pictures too! 

• BLACK & WHITE or GREY SCALE printing. In GREY SCALE printing, colors are printed as 
user definable patterns. Supports hl-res In all 4 GRAPHICOM display modes! 

• Ix. 2x, 3x PRINTOUTS - Three menu options are reserved for the most frequently used prin- 
tout sizes, Ix (quarter page), 2x (half page), and 3x (full page) 

• GRAPHIC LABELS - The label printing option allows the user to create custom mailing or disk 
labels with professional looking results 

• GREETING CARDS • The greeting card option allows the user to custom design greeting cards 
using both text and graphics. 

• GIANT POSTERS • The poster option provides the user with a means of reproducing a hi-res 
graphic to a mulli-sheet poster 

• SPECIAL EFFECTS - The special effects option allows the user to directly control the printing 
directives; ROTATION. X/Y SIZE. X/Y FLIP. X/Y GRID. X/Y FILL. TAB. WINDOW. POS/NEG 
IMAGE, and more! 

• USER CALL • Have an application that HARDCOPY doesn't quite match 7 HARDCOPY routines 
can be added to EXTENDED BASIC through the USR command! 

HARDCOPY ' requires a 64K Color Computer or Color Computer II, and at least one disk drive. Il supports 
1 to 4 disk drives, keyboard or Joystick Input. Please specify printer and cat. number when ordering. 

• Due to hardware differences, some features may function differently on certain printers. 



IDS 480/560-G 


Cat 


No 


I70WD 


Epson LX-BO 


Cal 


Ni 


I73WD 


DMPIIO 


Cal 


No 


180WD 


Okl 82A (Oklgraph) 


Cat 


No 


I79WD 


Epson MX-BO 


Cal 


No 


I72WD 


DMPI20 


Cal 


No 


I76WD 


Okldala 92 


Cal 


No 


I71WD 


Epson RX-BO 


Cal 


No 


I73WD 


0MPI30 


Cal 


No 


IB2WD 


Gemini IOJC 


Cal 


No 


174WD 


Epson FX-BO 


. Cal 


No. 


I73WD 


DMP-200 


Cat 


No 


I76WD 


Gemini 5G- 1 0/ 1 5 


Cal 


No 


1 78WD 


Riteman PLUS 


Cal 


No 


I77WD 


CGP-220 


Cai 


:,c, 


I8IWD 




rou could ssssss&mgs T ,Sst r B G uT E ff^mfaniTinnnfffniriilfl 

.clipse (Zoom) S19 95/MorelonBay | Ul I n il Wl II l~ *\ T% It l! IJ LI U I 'ill ' |l \ 

uper Paint (Paint) SI9.95/Michtron Text Master (Hi-Res Text) S29 95/Dalo Man V. MP ! HHal JWJ Tl| »"iWi"*« W'W^' II II I 

hrinx (Reducer) 52195/Grafx 0.CU (Disk Ul es) S 1 9.95/tomputize W^ A- m. H J 

)R YOU COULD SPEND $24.95 FOR GRAPHICOM PART II AND GET: DISTRIBUTED BY CDMPUTIZE INC. 

i vldto processing package that provides many functions that arc missing In Graphtcom. 
Itrt are Jast a few of the features provided by Graphtcom Part II: 

■NLARGE/REDUCE/ROTATE IHWFEI 

Enlarge or reduce any portion of a graphic screen, just like a photographic cnlatger 1 Rotate by any degree or B^j J | || ' j j j , ■ is bf- ^- |— iiixi jt i pya jr< Hfl 

raction of a degree around any polni on the screen Bi/^rfB^'J^^ '* ' ^** ' — a irill i i i l l !' u 

■aint Wi^St^m m.-i mi^i Hr-nr 

'aint or fill-in any irregular area on (he screen 1 More than 50 different colored patterns available. Addi- ':[ _ ■ RJ KuSJlsL^sl LW« UL 

tonal paint oaiterns may be user-defined 

•an & zoom i i r ; ■rT.tWrYg^— - -,-. ; . . , . 

Zoom in x2. x4, or x8 on any portion of the screen to do Tine pixel wort- Allow ■lsTM^a?^'- 1 U <1 W 1 b T « 1 J l_ I C^" ■' i | D 1 I S K j 

haracter sets with ease! ^J JU L I __ _ 

■YPESETTER & FONT EDITOR iFTTt O ^STT M * '' WWWJI ^SB l _ sW^il 

\dd text in 16 different sizes, also supports user definable foreground & background colors Design tk Edii iJil^ ■* jJM. 1 . ,^fc._-^-^-JHJ lal'illlL. jH ,_ , ' -BmV-'/i 

haracters for use in the typesetter if^P'^f Im fCi I — «■— — ->r-vi — ? - i- i -r r in 

'LXEL BLASTER hsMBsW^BsUsI ^R?tffffH FflfVi J -fl | 1 1 1 

Allows the user :o easily substitute or remove colors Widen lines. swap BLUE 6 RED with oil fr^^^T^^iTT nLAU^Jda^BB i^A&AfUdafcl BIBbism^ 

■RAPHICOM PART II DOES NOT REQUIRE GRAPHICOM TO RUH1 ® 1384 V# H I ■ E S ■■■ X T H U - 1 . U 

raphlcom Part II requires a 64K extended disk basic system, and supports 1 to A disk drives, keyboard or ALL RIGHTS RESERVED 

•ystick (analog or switch type) input. It wiil load and save both Standard BIN files and Graphlcom screens rDflDUTrOH/T nRnf tt a^« AC 

II functions support color or Hi-Res operation, as well as the -1 screen display modes 4jfJKi4x rllL-UlVl a Al\ 1 IX p*C*±.5yD 

NEW LOW PRICE! GRAPHICOM $24.95 mJSSSSF SETS SUPER BACK-UP 

Catalog No 1 1 IGD Available from COMPUTIZE TTTTT TTV (Pi 

{IP A PHir DM Simply i.a.td - On. of th< lineal graphic 4C • Artifact coloi palette U 1 11- 1 1 I Je/ 

WU*ri™*<w»Vl pros-ram. written for Ih. Color Compni.rl 5C ■ Large character sets (from Derringer Soft- WITH S.B.U FROM COMPUTIZE - 
IWTTIVEll fit CQnn FEATURE™ P ware) YOULL NEVER NEED ANOTHER BACK- 
DIGITIZER SI 59.00 .S-U-P-E-RU-S-E-RF-R-I-E-N-D-L-Y! 6C • Same as SC but set up as slamp set ^JcTHY.K m V nru i?^',', , ore 

. Supports A Hi-Res display mode, Pier. OU S« S...95 SffrffiraSMwS 

Input directly Into Gr.phlcom for easy • * page animalion mode 7 - Miscellaneous An Set » I ™ R " AlL OF THE F LLOWING ™ NC " 

enhancements, manipulation, stamping, • Color Palette with over 15 color patterns 8 - Miscellaneous An Set »2 Tin m tik Q«.,Hi ra n( n.i 

and storage Accepts composile video Tor use with Hi-Res artifact g . Miscellaneous Ads and Examples ' ' I" U° sc heme^ 

signal in (I.Ov p-p) from video camera, • Send/Receive pictures over modem Plclll „ Dll , Ul2 S19 95 ?b PE TQ DISK (Move Cassette ore 

VCR. video disc player, another com- • Supplied utility allows capturing Hi-Res 10 . «,,„,,,„,.„, Fon „ 2 - J*"; , n .°{,,, (Move t - Dsse " e P ro 

=s:ip?s;s= . ggussBits £Sr5?-- ,..« 45!Shaun« 

Use with your mul.i-pak or a r cable M/L programs Plctar. DUk Sot 4 S14.9S D ,S K TO D SK (Our oowerful Solit-N- 

rv" rahle available ai S IQ qui • Supp ed ult lv for oading screens from s - f" 4K J " miK > u i" powerlul »piti-n- 

Vldeois inpu vta .' BNC ? conn«cto. Ba?ic or o.he/sources TTTTZZZ^ZZZ Image Program, Copies regardless of 

Externa? in.rc.ls for HORIZONTAL POSI- • Bull, in Hi-Res SCREEN PRINT (compali- GC II FONT DISKS . tggSfiS&SF* 

TION. VERTICAL POSITION. HORIZON- We with EPSON OITOH GEMINMO. E.ch dlak contain. 10 or mor. fonU, (4 v.r- . =.« \VL ovrrMnBr. rnrn 

TAL WIDTH. BRIGHTNESS, and CON- OM plus Radio Shack's LP-VI1 LP-Vl I .,„„ or „ ch ,„„,, „„ for „ cb d „ „ mod „. 2I2S 5S f 0B 2 Dmvls 

TRAST (FUZZ) settings DMP-1 00 DMP-200 and GCP-1 15 MC GCII Fonts Disk » I I S? MCHINE LANGUAGBIM 

Don't be fooled by imitations this is the pnnlcrs) from 1 10 to 9600 baud 15C . Gc| . - D . „, ctSnmmu mmiimuimit 

GRAPHICOM VIDEO DIGITIZER the • SEND/RECEIVE slow-scan television 6C ■ GC FonB D S #3 P Snr i «m S5rar l» EXCESS S 

only digitizer that DIRECTLY • inputs in- -Many additional features, operating gSaph.COM part -n Vnn. DM. <.««c PROGRAMS COSTING IN EXCESS OP 

toGraphicom hints, hardware mods and suggestions. GRAPHICOM PART U Font Dlik. ... S19.95 M»W 

REQUIRES 64K COCO, 1 DISK DRIVE, etc DISK $49.95 .... Cal. Mo. 10/CD 

AND 2 ANALOG JOYSTICKS. FREE REQUIRES 64K COCO. 1 DISK DRIVE, — -— . - _„ „ .,_,.-,, 

GRAPHICOM PROGRAM. PICTURE AND 2 ANALOG JOYSTICKS TRIPLE TRANSFER 

DISK, AND GRAPHICOM UTILITY SUP- TTTTT TTV (c) CDTT U TTUI n m (r^ 

PUED WITH PURCHASE OF VIDEO ___ ,._-___ „_„ TI T . UT1L1 TX,T SPIT-N-IMAGE (C I 

DIGITIZER (A S50 VALUE). NEW MASTER KEY II Transfer conlen s of disk o tape • M/L Disk Back-Up Utility 

New Improved Version' A hardware product Transfer contents of tape to disk • There is no need to suffer the heartbreak 

"V" mm EC that lakes control of any program regardless of Automatically relocates cassette pro- of crashed disks any longer. Splt-N-lmage 

I laHOlXd jfc^ protection Now use will. RS MulU-pak. T B ram5 ,hM c °S' llc w " h ,h l d ^ opBral " wl " """ ' mitror ima ? e of V°ur 

cable or optional extender cable Captures mg system • Displays machine language valuable disk programs which do no. res- 

register conlanls as ihey were when Master Key WV" """'esses -Copies ASCII Basic, pond to normal back-up functions. Will 

II was engaged Complete disassembler * Machine Language Programs ■ All con- also initialize and back-up in one pass 

memory save, and much more. Requires some ^'"ea "I I i ™nu driven P'°8'am' Data processing experts always insist on 

familiarity with Assembly Language. _ „,' «, 3ZK ,CC »«• having a back-up - i.J good » prac.ice. 

A<nni- ROM PAK C... No. I60HI . . .... S 99.9S CauctU S19.95 . Cal. Ho. 105CT REQUIRES 32K CC 

5199b C.1 No .161 HR With Bit. Cable ... $109.95 Dllk $24.95 Cal. No. 10SCD DISK S3'!. 95 Cal. Ho. 101 CD 




Check or M.O. 

Add $3.00 

shipping 



(215) 946-7260 P.O. BOX 207 • LANGHORNE, PA 19047 



PA residents 
add 6% 
sales tax 




SPECIALS = 

Howard Medical Computers 




Zenith 1 30 Color Monitor $1 59 



Medium resolution 2.5 MHz 240 x 200 dots 

Same as 131 except No RGB 

With 90 day Zenith warranty 

Monitors require video controller See page 34 * 



s* <** Was $399 
^Vo^ ($14 shipping) 





Epson RX-80FT 



** 



K 



Friction and tractor 80 column 

Bidirectional dot addressable 100 CPS 

Free Howard Printer tutorial included (a $29.95 value) 

RX100 $362 each 



$207 

Was $318 
($7 shipping 



Ding) 



Zenith Green Monitor 



12" Zenith 123A Green Si is easy on ti 

High re: ■ 640 dots x 200 dots, 

15 MHz band width 

Composite video monochror $P 



$67 50 

U G** Reg. $149 
^V° ($7 sn 'PP in 9) 



New! J&M Controller 



JFD-CP 
with JDOS 



mates software compatibility problems 
Single switch lets you switch trom J DOS to RS DOS 
Gold contacts & data separator 
New serial port so you don't need a sei i 
interface for a parallel ; 



$128 

Reg. $14S 
($2 shipping] 




RS DOS ROM 



• ROM chip makes J&M compatible 

• 24 pin fits both versions of J&M controller 

• Release 1.1 

Howard Medical Computers 



$20/ea. 

Reg. $4C 
($2 shipping; 



Box 2. Chicago, I L 60690 



Hours: 8-4 Mon 
Sat 



(312)278-1440 questmr 



offers a 30-i. 
insatisfled for a 



"V A 



/^ 






,o 



<*X 



<IX 




I Time Clock. This is a clock chip that will 



d contacts 
Shielded metal box for low RF noi. 
4 28-pin sockets for software expandabil 
Uses 2764 or 27128 EPROMS. 
EPROMS are software selectable. 
Internal Mini-Expansion Bus interface for; 

- 80 Columns 

- Real Time Clock and/or 
-Parallel Printer or 

- EPROM Programmer 

- User Projects. 

Complete Radio Shack compatibility. 

New technology, no adjustments needei 

Very Accurate 1 6m hz High Speed Master Clock. 

., '. , c .,„ „ . ■* „„ rnrnr . „, rn»»n m^ Tne ' ourtn |S a real knock-out. This is a three in one card. 

Needs + 5 volts only, works on all COCOs or COCO lis. major func|ion js t0 add an 80 * 24 display l0 your corn „ uter . 

: XPANSI0N ADD-ONS: A feature packed package also includes RTIME and PPRINT. 



e when the Computer is off, retreive and set the time by using 
iple Basic POKES. Also available with the Real Time Clock 

is the optional Centronics Compatible Parallel Printer adapter. 

Software to set the clock and printer driver included. 



programmer that attaches to the disk controller. A must for the 



m 



program 2764's or 27128's, a perfect mate for the DISTO Super 
Hnntroller. 



Er c e o a ntraire r r rently ^ add "°" S aVa '' able ,r ° m D ' ST ° "" 0S9 80t1ware avallaD,e - Ua " ,or more ln,ormauon - 

?. PR !^ - «. . « .. L . ., .„•. The DISTO Super Controller, add-ons and all its documentalion are conce... 

The first IS a Centronics Compatible Parallel Printer adapter. and designed by Tony Dlstelano. The DISTO Super Controller and add-ons are 

This adapter will allow you to connect a Centronics compatible manufactured and distributed by; c.r.c. computer inc. 

printer directly to your controller, leaving the serial port of your 10802 Lajeunesse, Montreal, Quebec, Canada H3L 2E8 i-5i4-383-52° r 



The first is a Centronics Compatible Parallel Printer adapter. 



All in one neat package that fits inside the controller. 
OS9 software available. Call for more information. 

CREDITS: 

The OISTO Super Controller, add-ons and all its documentation 



ire conce.. 



rj* 



-A 



n 



Controller and add-ons are copywrited by DISTO. 



<\ 



>rVA 



HEAT UP YOUR COCO ! 




HARD DRIVES 



Besides the obvious advantage of increased disk access 
speeds and a vast amount of storage, our COCO hard 
drives boast many innovative features. For instance, 

you may boot OS/9 

directly from 
JDOS - no 
intermediate 
boot floppy is 
required. Our 
software can 
run with virtually 
any Winchester with a 
ST412 type interface. Our drives have capacities of 5, 
10, or 20 MBytes (formatted), and may be either 
partitioned into up to 7 logical units or left as one 
large logical unit. Our COCO hard drive systems are 
complete with case, power supply, cables, OS/9 
drivers, and instructions. Prerequisite: OS/9, JFD-CP 
controller. 

5 'A" 5 MByte full size $495 

5 W 10 MByte Vi size $650 

3V2" 20 MByte (shown above) $795 

JFD-CP DISK CONTROLLER 

Our new JFD-CP, compatible with both the original 
COCO and the COCO 2, features a parallel port to 

support a 
Centronics 
.compatible 
printer or our 
hard drive, 
and an 

external ROM 
switch, which 
allows you to 
select JDOS or 
an optional RS 
DOS-type ROM. It comes in 
a case and includes JDOS 1.2 and manual. JDOS 
implements all RS DOS commands, plus many 
more, including auto line numbering, error 
trapping, baud rate selection, OS/9* boot from 
floppy or hard drive, and Memory Minder**, our 
disk drive analysis program (Precision Alignment 
Disk not included). 
JFD-CP Disk Controller with JDOS $ 1 39 

COCO-CLASSIC 

Our old JFD-COCO controller remains a strong 
seller. Some people just like old "classics" best! So 
we have brought it back at the lowest price ever! 
JFD-COCO Disk Controller with JDOS $99 




A/^ TERMS 

One-year warranty on parts & labor; 30-day money 
back guarantee (except shipping) if not totally 
satisfied. Items must be returned in like new 
condition. 

Free shipping via UPS in continental United States 
for payment by VISA, MasterCard, or cashiers check. 
COD requires 10% prepayment by bank card plus 
3% shipping. Blue Label and foreign shipping extra. 





DRIVE SYSTEMS 

Upgrade your Color Computer by adding our new 
JFD-CP disk controller, supercharged with JDOS 1.2 

operating 
system, and a 
top quality 
drive with case 
and power 
, supply. Comes 
complete with 
cable and JDOS 
manual. 

Drive System with one single side drive $279 

Drive System with one double side drive $349 

Drive 0, 1 System with two single side drives $389 

Drive 0, 1 System with two double side drives $489 



MEMORY MINDER** 

Memory Minder 

is a disk drive 
test program now 
included in 
JDOS. Used 
with a 
Precision 
Alignment 
Disk, 
Memory 
Minder allows 
^/)J\ you to check 

your drives for speed, 
alignment, sensitivity, hysteresis, 
and more! You can actually align or adjust the drives 
while viewing the graphics on the screen. No special 
equipment needed! 



PRECISION ALIGNMENT DISKS (From Dysan) 
PAD-40X 1 : Tests single side disk drives $26 

PAD-40X2: Tests double/single disk drives $33 

Memory Minder is available on diskette for those 
who don't own a JFD-CP controller with JDOS. 
Includes Precision Alignment disk. 








'^"' 



Memory Minder: single side package 
Memory Minder: single /double side package 



"OS/9 is a registered trademark of Microwaro. Inc. 

••Memory Minder is a registered trademard of J&M Systems, Ltd. 



$59 

$75 



<//A 

J&M SYSTEMS, LTD. 

15100-A CENTRAL SE 

ALBUQUERQUE, NEW MEXICO 87123 

505/292-4182 



